ABSTPvACT 

This docxament describes the problems and solutions associated 
with generating and running RSTS/E V06A-02 systems. The sys- 
tem manager should read this entire document before generating 
the system and include the solutions as part of the procedure 
to generate RSTS/E. 

The fommat of this document conforms to that used in the Soft- 
ware Dispatch. The organization of the sections is such that, 
after usage, the pages can be filed in appropriate order in a 
notebook. A collection of existing problems and solutions for 
RSTS/E can therefore be kept in one location. 

For further information on RSTS/E documentation, refer to the 
RSTS/E Documentation Directory, Order No. DEC-11-ORDAA-A-D. 
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1.0 INTRODUCTION 

Installation Notes are a compendium of information which 
provides the customer with a maintenance notebook on cur- 
rent software documentation and the status of known soft- 
ware problems. The Notes are supplemented with articles 
in future monthly Software Dispatches sent automatically 
during the first year after purchase and later under 
maintenance contract. Contact your DIGITAL field office 
for maintenance information. 

2.0 FILING 

A system has been devised for RSTS/E and its components 
to allow each article to be filed in its proper place. 
The key to this system is Figure 1 below. 



SOFTWARE PRODUCT 
(1) 


VERSION 
(lA) 


COMPONENT 
(2) 


VERSION 
(2A) 


SUBPROGRAM OR ADDITIONAL INFORMATION 
(2B) 


SEQUENCE 
(3) 


PAGE 
OA^ 


NEW REPLACEMEN- ARTICLE 

It4)| 1(5)1 


ORIGINAL DATE 

(5A) 



Figure 1. Coding block 



Each month the customer should take apart the Software Dispatch 
sent him and insert the pages in the notebook. 

The articles are referenced by sequence number. Article sequence 
numbers take this form: MODULE . COMPONENT . SEQUENCE or numerically 
this would be 2.3.1. As an article is added to each component, 
it is assigned the next sequence number. 

All other information in the coding block is to further clarify 
the article and is not specifically for filing, 

(lA) Version of the software product. 

(2A) Version number of component. 

(2B) Other information helpful to the user. 

(3A) Number of article pages. 

(4) An "X" in this block indicates a new article. 



(5) A number in this block indicates an article republished for 

revision or correction and specifies the number of revisions. 
For example, the second revision of an article which originally 
appeared in June 1974 is shown in Figure 2. 



(5A) Original date of a revised article. 



NEW REPLACEMENT ARTICLE 



ORIGINAL DATE 
June 1974 



Figure 2. Coding block showing second revision. 



2.1 Software Modules and Components 

1. RSTS/E SYSGEN 

1. SYSGEN Patches 

2. Software Notes 

3. Hardware Notes 

4. DOS /BATCH Notes 

5. Batch Files 

2. RSTS/E Executive 

1. INIT Patches 

2. INIT Notes 

3. MONITOR Patches 

4. MONITOR Notes 

5. Terminal Service (TTY) Patches 

6. Terminal Service (TTY) Notes 

7. File Processor (FIP) Patches 

8. File Processor (FIP) Notes 

9. Device Driver Patches 
10. Device Driver Notes 

3. RSTS/E BASIC-PLUS 

1. BASIC Patches 

2. Notes/Programming Hints 

3. Concise Command Language (CCL) 

4. Math Packages 

5. Matrix Functions 

6. Print-Using 

7. Record I/O 

8. Virtual Core 



4. RSTS/E Utilities 



1. 


ANALYS 


2. 


BACKUP, BACKDK 


3. 


BATCH, BATDCD 


4. 


BUILD 


5. 


COPY 


6. 


CREF 


7. 


DIRECT 


8. 


DISPLY, VT05, VT50 


9. 


DSKINT 


10. 


EDIT, EDITCH 


11. 


ERRCPY 


12. 


ERRCRS 


13. 


ERRDIS, ERRDIl 


14. 


FILCOM 


15. 


GRIPE 


16. 


INIT 


17. 


INSTAL 


18. 


INUSE 


19. 


LNGBLD 


20. 


LOGIN 


21. 


LOGOUT 


22. 


MONEY 


23. 


ODT 


24. 


PLEASE 


25. 


PIP 


26. 


PIPEXT 


27 = 


PPT OR 


28. 


QUE 


29. 


QUEMAN 


30. 


QUOLST 


31. 


REACT 


32. 


REORDR 


33. 


RESEQ 


34. 


RJ2780 


35. 


RUNOFF 


36. 


SHUTUP 


37. 


SPOOL, CHARS 


38. 


SYSCAT 


39. 


SYSTAT 


40. 


TALK 


41. 


TKB 


42. 


T'i'YSET 


43. 


UMOUNT 


44. 


UTILTY 


45. 


TSTBLD 


46. 


CONTRL 



RSTS/E Software Dispatch 
December 1975 



This page replaces page 9 formerly appearing in the V06A-02 Software 
Dispatch Review. Please note changes below (Section 8., nos. 1, 2, 
3 and 4) . ^ _^ 



47. 


CPEXER 


48. 


CREXER 


49. 


DBEXER 


50. 


DFEXER 


51. 


DKEXER 


52. 


DFEXER 


53. 


DTEXER 


54. 


KBEXER 


55. 


LPEXER 


56. 


MTEXER 


57. 


PPEXER 


58. 


PREXER 



5. RSTS/E System Documentation 

1. RSTS/E Documentation Directory 

2. RSTS/E System Generation Manual 

3. RSTS/E System Manager's Guide 

4. RSTS-11 System's User's Guide 

5. BASIC-PLUS Language Manual 

6. RSTS/E Programming Manual 

7. RSTS/E Reliability Test Manual 

8. RSTS/E System Installation Notes 

9. RUNOFF User's Guide 



DEC- 
DEC- 
DEC- 
DEC- 
DEC- 
DEC- 
DEC- 
DEC- 
DEC- 



11-ORDAA-A-D 
11-ORGNA-A-D 
11-ORSMD-A-D 
11-ORSUA-D-D 
11-ORBPB-A-D 
11-ORPMA-A-D 
11-ORSRB-B-D 
11-ORINB-C-D 
11-URUNA-B-D 



6. COBOL-11 (Software Product Description 12.40.1) 



1. Patches 

2. Notes/Programming Hints 

3. COBOL-11 User's Manual 

4. Reference Manual 

SORT-11 (Software Product Description 12.7.0) 

1. Patches 

2. Notes /Programming Hints 

3. SORT-11 User's Manual 



DEC-11-LCUGA-A-D 
DEC- 1 1 -LCOBA-B- D 



DEC-11-USTMA-B-D 



RSTS/E 2780 Emulator (Software Product Description 10.50.0) 

1. 2780 Notes/Programming Hints 

2. 2780 Patches 

3. 2780 User's Manual DEC-11-ORJEA-A-D 

4. 2780 RCS Installation Notes DEC-11-CCDNA-A-D 



RSTS- 


•11 SORT 








1. 


Notes/Programming 


Hints 


2. 


SORT 








3. 


KEYDMP 








4. 


MQWIK 








5. 


OQWIK 








6 = 


SQWIK 








7. 


XQWIK 








8. 


RSTS-11 


SORT 


User 


s Manual 



10. RSTS/E Commercial Extensions (lAM) 

1. Notes/Programming Hints 

2 . lAMGEN 

3. lAMCRI 

4. lAMDMP 

5. lAMVFY 

6. lAMPRI 

7. lAMFNS 

8. Commercial Extensions User's Manual 

9. 4-Word Decimal Arithmetic Package 

11. RSTS/E WISE 

12. RSTS/E EDU-DECAL (Software Product Description 15.85.0) 

13. PICTURE BOOK (Software Product Description 15.65.0) 



3.0 SOFTWARE PERFORMANCE REPORTS 

Each new installation is provided with Software Performance Report 
(SPR) forms. The SPR form enables users to suggest enhancements to 
or report problems with Digital Equipment Corporation software or 
documentation. When a problem is encountered, an SPR should be 
completed and mailed to the local SPR Center. {See inside back 
cover. ) 

Responses -/ill be sent to the name and address appearing on the 
form. Additional SPR forms may be obtained by writing to the 
local SPR Center. SPR response is free for a period of one year 
and by subscription thereafter. 

3.1 Software Performance Report Guidelines 

This guideline for SPR completion is provided to ensure adequate 
information is included to prevent delays in processing. 

Every SPR form should be completely filled out. Information such 

as CPU type, system device, and memory size must always be included. 

An adequate and clear description of the problem is very important 
and will certainly speed response. 

It is important to know the complete hardware configuration for 
that installation, including system disk, amount of core memory, 
hardware options such as hardware, FPP, and peripherals on the 
system. Similarly, it is important to know what RSTS/E monitor 
options were specified at System Generation time, including two- 
or four-word math packages and BASIC-PLUS options. The easiest 
way to provide this information is to attach a listing of the 
CONFIG. MAC and SYSGEN.BAT files created during System Generation 
or include a copy of the printout from the keyboard printouts which 
demonstrate the problem. 

In addition to the above points, it is important to specify the 
following items when submitting an SPR concerning a BASIC-PLUS 
CUSP: 

1. The name of the CUSP. 

2. The version number and edit level of the CUSP. (Some CUSPs have 
several edit levels of the same version in the field.) 

3. Under what account (s) the CUSP failed; that is, distinguish 
between privileged or nonprivileged. 
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4. The PRIORITY and SWAP MAX which the CUSP was running when 
it failed. 

5. A terminal printout of relevant command strings. 

6. A complete list of any modifications which have been made 
to the CUSP at the user installation. (This will not only 
help to determine the possible cause of failure but will also 
suggest changes to inprove CUSP reliability.) 

Software Support is unable to analyze crash dumps submitted with Software 
Performance Reports (SPRs) without, as an absolute minimum, a listing of 
the system load map. Also, a machine-readable copy of the dump file 
[0,1] CRASH. SYS is very desirable, either on DECtape or magtape. 

Before submitting an SPR, the user should review the Software Dispatch 
to ensure that the problem has not already been published. 
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h.O DIFFERENCES BETWEEN RSTS/E V06A-02 AND V05C-01 

RSTS/E V06A-02 Introduces new hardware support and several 
new software features. 1974 ANSI COBOL and the PDP-11 SORT are 
available for use with this release. All known V05C-01 problems 
have been corrected. The manual set has been revised to reflect 
the new hardware additions and software changes. System changes 
are summarized In these notes and specific details are presented 
In the appropriate manuals. 

V06A-02 was submitted to the Software Distribution Center on 
June 26/ 1975 and will begin volume shipments during the last 
part of July. Customers In the first year following RSTS/E 
Installation and subscribers to the RSTS/E Standard Program 
Update Service will receive V06A-02 at no extra charge. 

1. NEW HARDWARE SUPPORT 

Support for the PDP-11/70/ RP02 Moving Head Disk/ and the 
RXll/RXOl Floppy Disk System was added In V06A-02. Important 
changes have also been made In device drivers and system code to 
Increase system reliability. V06A-02 fully supports the extended 
parity checking features of the PDP-11/70. Offset read 
capability was added to the RPOi* driver. And the system will now 
permit operation of the system disk from any drive unit. 

The PDP-11/70 features extended memory addressing to 

X r will wwiua/ iii^ii a^^eeu uipuiar cdcne memory/ a muici-ous 

Structure with extensive parity checking on memory and I/O data 
pathS/ Integral memory management unit/ UNIBUS MAP/ and high 
speed peripheral controllers. 

RSTS/E V06A-02 supports the hardware maximum of 1 Million 
words of main memory on the 11/70. On large systems/ the 
previous maximum of 12ifK words was often a limiting factor for 
system performance. The 11/70 expanded memory capability will 
allow Increased throughput and expansion capability for RSTS/E 
systems. 

V06A-02 provides error logging of all memory parity errors 
and supports the extended parity checking capabilities of the 
11/70. Parity errors In user memory affect only one user and/ If 
the error Is reproducible (hard)/ the system will lock that IK 
section from further use (equivalent to memory parity support on 
the 11/40 and 11/45). All 11/70 cache warnings are error logged 
and two warnings within the same minute will cause the system to 
disable that half of the cache memory system. RSTS/E continues 
running with one or both cache groups disabled. Memory parity 
errors detected by the RH70 controllers are error logged and the 
operation Is retried. Finally/ all UNIBUS Aborts are error 
logged. 
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The 11/70 UNIBUS MAP translates 18 bit UNI BUS addresses to 
22 bit main memory addresses through a set of 31 mapping 
registers. This translation Is required for all NPR data 
transfers from UNIBUS devices to 11/70 memory. RSTS/E uses a 
fixed allocation scheme for the UNIBUS MAP. Seven registers are 
used to map the memory occupied by the RSTS/E Monitor. This set 
of registers is used by all NPR devices which transfer to/from 
Monitor buffers. Devices In this category under RSTS/E are the 
TCll DECtape, CDll Card Reader^ and DHll Multiplexer. One set of 
8 mapping registers Is allocated to each UNIBUS peripheral which 
performs NPR transfers directly Into user memory. The supported 
devices In this category are the RC11/RS6I^ and RFll/RSll Fixed 
Head Disk systems^ the RK11/RK03/RK05 and RP11C/RP02/RP03 Moving 
Head Disk systems, and the TMll/TUlO magtape system. Up to three 
such devices may be used on RSTS/E 11/70 systems. A third class 
of NPR devices are the MASSBUS peripherals Including the 
RS03/RS0U Fixed Head Disk system, RPOii Moving Head Disk system, 
and the TM02/TU16 magtape system. On the PDP-11/70 these devices 
are connected through the RH70 peripheral controllers which are 
capable of 22 bit memory addressing. No address translation Is 
required for data transfers on these devices. 

Support for the RP02 Moving Head Disk was added In V06A-02. 
The RP02 Is an economical 10 Million word disk drive similar In 
appearance to the larger RP03. Except for minor size 
considerations, the RP02 Is treated exactly like an RP03. The 
RP02 may be used as the system disk or an auxiliary mountable 
disk, either In the public structure or as a private pack. RP02 
and RP03 drives may be mixed In any combination on the RPllC 
controller. The system will automatically determine the type of 
each drive. 

The RXll/RXOl Floppy Disk System Is also supported In this 
release. The floppy disk Is a highly reliable random access 
storage device about the size of a 45 RPM record. The fexlble 
recording disk rotates Inside a flat envelope which has slots for 
the read/write head, spindle, etc. Each floppy can store 256K 
characters. The controller will handle two RXOl drives and up to 
four controllers (8 drives) can be supported under RSTS/E. Due 
to lack of an Industry standard for a floppy disk file structure, 
only non file-structured support Is provided In this release. A 
floppy disk may be accessed In either of two modes selected by 
the MODE parameter on the OPEN In BASIC-PLUS. In Sector mode all 
2002 disk sectors (128 bytes/sector) are available to the user 
program. Detection and writing of "deleted data marks" Is 
supported for IBM compatibility. In Block mode h9k disk blocks 
(512 bytes/block) are available. Block mode Is compatible with 
RTll, RSX-llM, and RSX-llD floppy support (DEC standard 2 to 1 
Interleaving with Track * 6 skew). 
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Offset read support for RPOi* disk drives was also added in 
this release. RP04 drives are capable of offsetting the heads up 
to 1200 micro-Inches on either side of a track center! Ine. If 
data cannot be read without error after 16 retries, the driver 
will use offset positioning to recover the data. A data error 
wjll not be returned to the user program unless all retries and 
all offset reads are unsuccessful. ECC correction of burst 
errors was supported In V05C-01 and Is retained In V06A-02. All 
data errors, whether corrected by ECC or offset positioning, are 
error logged. The combination of ECC and offset read support 
permits extremely reliable operation of the RP0i> disk subsystem. 

In previous RSTS/E systems, the system disk could only be 
operated on drive unit 0. If this unit was down for repair or 
preventive maintenance, the system was also down. This 
dependence on unit has been eliminated In V06A-02. The DOS 
based system generation still relies on unit and the resultant 
RSTS/E system disk must be bootstrapped once on unit 0. 
Thereafter, the system disk may be operated on any available 
drive. 



II. SYSTEM GENERATION 



The system generation procedures changed very little from 
V05C-01 to V06A-02. One question was added to determine if the 
RSTS/E system would run on an 11/70. A memory size question was 
also added since It is no longer practical to default the memory 
allocation table (CORTBL) size to handle the maximum possible 
memory configuration (previously 12UK but now 1024K on the 
11/70). One final question was added for floppy disks. 

III. INITIALIZATION CODE 

Many Internal changes were made to the Initialization Code 
for 11/70 support, RP02 support, and system disk unit number 
Independence. INIT performs several consistency checks related 
to the 11/70, sets up the UNIBUS MAP, and enables the 11/70 cache 
memory system. With regard to the RP02, the Initialization Code 
checks the type of all RP drives and sets up the appropriate INIT 
and Monitor tables accordingly. The secondary bootstraps 
Installed by INIT on the system disk were modified for this 
release to pass the unit number of the drive booted. INIT uses 
this information to Implement unit number Independence. Although 
somewhat extensive, these Internal changes are transparent to the 
user. The only visible changes are In the DSKINT, DEFAULT, and 
BOOT Initialization options described below. 
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The method used by DSKINT to format RP02 and RP03 disks was 
changed for this release. There was some difficulty with RP02 
disks using automatic controller formatting so a software 
formatter was Installed to circumvent the problem. The manual 
setting of the format enable switch on the RPllC Is no longer 
required when formatting RP03 or RP02 disk packs. The memory 
allocation table printed by DEFAULT was changed to accomodate 
large memory configurations (11/70). The table Is more concise 
but the Information displayed remains essentially the same as In 
previous releases. A new CACHE command was added to the memory 
allocation options available through DEFAULT. CACHE allows a 
section of memory to be exclusively reserved for FIP Buffering. 
This capability Is discussed In greater detail In Section V of 
these notes. The system magtape labelling default (DOS or ANSI) 
Is also specified In response to a new MAGTAPE LABELLING DEFAULT 
query printed by the DEFAULT option. Finally^ the BOOT option 
will now allow a non-zero disk unit to be bootstrapped. 



IV. COBOL AND SORTll 



PDP-11 COBOL and the PDP-11 Sort package (SORTll) are 
available for use with the V05A-02 release of RSTS/E. PDP-11 
COBOL conforms to the specification published by the American 
National Standards Institute (ANSI) In the document American 
National Standard COBOL^ X3.23-197ii. PDP-11 COBOL Is properly 
defined as a subset of ANSI COBOL and as such meets the ANSI-197U 
low level specifications with several additions and omissions. 
Specific features are outlined In the PDP-11 COBOL Software 
Product Description (DEC-11-XPDBU-A-D) available from Software 
Communications. This Is exactly the same COBOL announced 
previously for RSX-llD. SORTll Is also the same sort package 
available under RSX systems. COBOL and SORTll are distributed 
together on DECtape, magtape^ and RK cartridge disk. The package 
Is sold and supported as a separate product and Is not Included 
In the standard RSTS/E distribution kits. 

Both COBOL and SORTll are Interfaced to the RSTS/E system 
through a shareable library of routines (col lectlvely cal led 
RTSLIB) which emulate the Flh; Control Services of RSX-llD. 
RTSLIB operates as an auxiliary Run Time System similar to 
BASIC-PLUS. RTSLIB Is dynamically loaded whenever COBOL or 
SORTll Is called. This single copy Is shared by all users^ Is 
not swapped^ and Is not unloaded (removed from memory) until the 
access count goes to zero. Each user receives a separate copy of 
the COBOL language processor or SORTll which Is swapped. 

RTSLIB Is Included In the RSTS/E distribution kits since It 
Is unique to the RSTS/E system. Automated build procedures for 
RTSLIB (similar to the standard system library build) are 
documented In the RSTS/E System Generation Manual . Detailed 
procedures for Installing COBOL and SORTll are also presented In 
that document. 
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V. MONITOR AND FILE PROCESSOR 

ANSI standard magtape labelling for TU16 and TUlO drives Is 
available In RSTS/E V06A-02. The default record format Is ASCII 
stream data with Imbedded carriage control (ANSI "U"). ANSI "D" 
and "F" formats are supported In PIP/ the line printer spooler 
and RTSLIB (I.e. COBOL and SORTll). Multi-volume file support 
Is not provided In this release. ANSI magtapes may be 
Interchanged with RSX-llD V6A/ RTll^ and OS/VS 360/370 provided 
the IBM system Is generated for ANSI compatibility. 

DOS magtape format Is also supported In this release as In 
previous versions of RSTS/E. The magtape labelling default Is 
set with the DEFAULT option mentioned above. This default may be 
overridden when the magtape unit Is ASSIGNed (e.g. ASSIGN 
MT1:.ANSI) or with the MODE modifier on a magtape file OPEN 
statement In BASIC-PLUS. When a magtape file is created In ANSI 
format/ the OPEN statement can specify the record format/ record 
length/ buffer size/ and carriage control modifier character. 
This Information is returned by the magtape special function call 
when an existing ANSI magtape file is opened. 

FIP Buffering was Introduced In V05C-01 and was extended for 
this release. The option will now operate In any of three modes 
to speed up file processing. If the option Is selected at system 
generation time but memory Is not reserved for FIP Buffering/ the 
system will use the small buffer pool for this purpose. This was 
the only mode of operation available in V05C-01. When less than 
8K of memory Is reserved for FIP Buffering/ the system will use 
both the dedicated memory area and the small buffer pool. 
Finally/ if 8K or more is reserved/ the FIP Buffering module will 
use only the reserved area of memory. This latter mode of 
operation Is the most efficient. A new SYS call Is also provided 
In this release to enable or disable FIP Buffering. 

c J 1 « i\n/4^4-r^ M/-./^Q i.i^c avt-anAari tn UflRA — n9 ^r> Inrliirlo an 

additional protection mechanism. Normal Update mode will allow 
any unlocked block In a file to be written at any time by any of 
the updaters. If the RECORD parameter on a PUT Is missing or 
zerO/ the next sequential block in the file Is written. This Is 
not normally the desired result when processing a file In Update 
Mode. The Protected Update Mode will not allow a block to be 
written unless it has been previously read and locked. The 
program declares Its Intention to update the block by doing the 
read before the write. 

A special MODE is also required to gain write access to a 
User File Directory. In previous releases It was far too easy 
for a privileged program to OPEN and write Into a UFD acctdently. 
The special mode Is merely a protection mechanism to prevent 
inadvertent dtstruction of critical directory Information. 
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A few changes were made In the Scheduler and accounting 
routines. The Scheduler will occasionally give a temporary 
priority boost to disk bound jobs to avoid swaps and Improve 
throughput. Run burst/ which can be set by PRIOR or through a 
SYS call/ must now be a multiple of tenths of a second (I.e. 
5/10/15/20... for 50 hz. or 6/12/18/... for 60 Hz.) for better 
accounting data resolution. Partial ticks (tenths of seconds) 
accrued during one run are also saved for the next run to avoid 
round off errors. 

The line printer driver In V05C-01 would buffer any output 
request even If the printer was off line. An error was returned 
but If the program Ignored the error and simply continued output 
to the printer/ requests would continue to be honored until the 
buffer pool was filled. Since small buffers are used for many 
different purposes/ this could have a serious effect on system 
performance. In V06A-02 only the first request for printer 
output Is buffered when the printer Is off line. Subsequent 
attempts will return Immediately with the "Device Hung or Write 
Locked" error and the data Is not buffered. 



VI. TERMINAL SERVICE 



DHll servfce was reworked to reduce the number of output 
Interrupts. In previous releases/ any character buffered for a 
DHll line would also request an output Interrupt. This caused 
many extra Interrupts for Idle lines for which no output was 
buffered. The extra Interrupts Increased the overhead In the 
terminal service and reduced the maximum sustained character 
rate. In V06A-02 output Interrupts are requested only after a 
full request (one or more characters) Is buffered and then only 
If the selected line Is Idle. The net effect Is fewer Interrupts 
and greater traffic handling capability. 

In this release one small buffer Is always maintained for 
each DHll line. This avoids many of the small buffer allocations 
and deallocations previously encountered with high speed lines. 

In V05C-01 It was possible for one high speed device to 
monopolize the services of a program processing binary Input from 
multiple terminals. A simple (transparent) round robin scanner 
was added to multi-terminal service to avoid this problem. 

VII. BASIC-PLUS 



There were very few changes to BASIC-PLUS for this release. 
Special MODES for magtape processing/ Protected File Update/ and 
access to UFDs were mentioned In previous sections. One new 
function was added to CVT$$ to handle quoted strings. These 
additions are documented In the BASIC-PLUS Language Manual. All 
changes are upward compatible from V05C-01 so no changes are 
required to existing programs. 
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VIM. SYSTEM LIBRARY PROGRAMS 



There were several changes In the system programs for 
V06A-02. The REORDR program was added to restructure disk 
directories for fast access. PIP was completely rewritten. 
Features were added to IN IT, UMOUNT, RUNOFF/ BATCH, COPY, and the 
spooling package. Minor modifications were also made to SHUTUP, 
UTILTY, VT5DPY/ and SYSTAT. 

REORDR Is a new program for V06A-02. This utilty provides a 
convenient means to reorganize disk directories. RSTS/E User 
File Directories consist of a number of 256 word disk segments 
divided Into eight word blocks. Each file has a name block, an 
accounting block/ and some number of retrieval blocks which 
contain the pointers to file data. The name block Is linked to 
the accounting block and to the first retrieval block. Retrieval 
blocks are linked together as a singly linked list. Name blocks 
also contain a link to the name block for the next file In the 
UFD. This type of directory structure becomes progressively less 
efficient as files are created and deleted under any given 
account. Since the eight word blocks which describe a file can 
be scattered across several disk segments, many disk accesses may 
be required to search a directory or to access directory 
Information. REORDR provides the means to restructure 
directories for optimal access. The program will gather all name 
blocks Into one disk segment (If possible) to speed directory 
searches. The accounting block and all retrieval blocks for a 
file are also grouped together In the same disk segment to reduce 
the number of disk accesses for directory Information. The 
directories are modified In place with no change In the size or 
location of the directory segments on disk. Actual file data Is 
not moved or accessed In any way. REORDR can operate on a single 
account/ selected groups of accounts/ or all accounts. Periodic 
reorganization of the directories can have a dramatic effect on 
system performance. 

PIP was completely rewritten for V06A-02. It will now 
handle wild card specifications In file transfers, deletions/ 
rename commands, and directory listings. PIP will also read and 
write ANSI magtapeS/ accept Indirect command files, and read DOS 
disks (all functions of DOSPIP). 

The IN IT program was modified to process Indirect command 
files and to accept alternate command files (I.e. something 
other than START. CTL) to control system start up. This feature 
will allow the system manager to perform non-standard system 
operations (e.g. run the REORDR program) before opening the 
system to time sharing. Two new commands, ATTACH and DETACH, 
were added to allow INIT to use only a single keyboard for start 
up. 
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A LOCK switch was added to the UMOUNT program to allow a 
disk to be mounted but left In the "locked" state. The program 
now checks for public disks and non-RSTS disks and returns a 
meaningful error message In either case. UMOUNT will also accept 
magtape commands to assign ANSI or DOS labelling default/ and 
provides a mechanism for rewinding the tape after use. 

RUNOFF has been Improved by the addition of an overstrike 
capability/ a character conversion feature/ DATE and NODATE 
commands/ and an abbreviation for the .INDEX command (.X). 
Overstrike allows two or more characters to be written In one 
print position (e.g. overstrike = with / to print / ). 
Character conversion allows translation of any character to any 
other character for output. DATE and NODATE enable and disable 
printing of the current system date on each page of output. 
Underlining of non-quoted spaces Is also possible with this 
version of RUNOFF. 

Two new commands have been added to BATCH for the V06A-02 
release. $COBOL will Invoke the COBOL language processor and 
$SORT will call the SORTll utilty program. A job card PRIORITY 
switch was also added to set the priority at which the batch job 
win run. 

COPY will now accept DENSITY and PARITY switches for greater 
flexibility In magtape copy operations. The spooling package was 
extended to support ANSI format magtapes and various types of 
simple forms control. UTILTY and SHUTUP were modified to allow 
loading/ unloading/ and control of auxiliary Run Time Systems 
such as RTSLIB. Display of Run Time System Information was added 
to VT5DPY and SYSTAT. 

IX. DOCUMENTATION 



The RSTS/E System Manager's Guide was divided Into a System 
Generation Manual and a System Manager's Guide for this release. 
The System Generation Manual Is concerned with the procedures for 
generating the system and using the Initialization Code options 
to best advantage. System library and COBOL build procedures are 
also Included In this manual. The new System Manager's Guide 
describes certain utility programs and presents guidelines for 
proper system management. 

The BASIC-PLUS Language Manual was also divided Into two 
manuals for this release. The Language Manual Is now smaller but 
describes all language features normally used by novice and 
Intermediate level BASIC-PLUS programmers. A new Programming 
Manual describes non file structured disk operations and other 
device dependent details for the experienced user. The chapter 
on system function calls formerly Included In the System 
Manager's Guide can now be found In this document. 

All V05C-01 addendums and documentation for V06A-02 features 
v/ere Incorporated Into the manual set. 
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X. OLD PROBLEMS CORRECTED 



There were several problems In V05C-01 which were corrected 
for that release by patches. The appropriate changes were made 
for V06A-02. These Include : 

1. The BASIC-PLUS SIN function generated a "Floating Point 
Error" for some arguments very close to N * PI for Integral 
N. 

2. An error In the Initialization option DSKINT which could 
result In destruction of the system disk under certain 
unusual circumstances. 

3. An error In the power fall auto-restart code which prevented 
recovery from power fall on systems with an RPQi* system disk. 

k. An error In non file structured DECtape processing whereby an 
attempt to read block 1 backwards resulted In block 1 being 
read forward. 

5. When using the BASIC-PLUS MAT INPUT statement^ a number In 
E-format could cause a "Not Enough Data In Record" error If 
It was the last number In the record and did not completely 
fill the record. 

6. An error In the BASIC-PLUS Run Time System which caused 
Memory Management Violations when APPENDIng programs which 
redlmensloned arrays and exceeded the available core. 

7. Under certain conditions an Immediate mode RETURN statement 
would result In confusing error messages. 

8. Deletion of the last line of a BASIC-PLUS program when a 
compile command was Issued with a syntactically Incorrect 
file name. 

9. Incorrect handling of embedded quotes by the C\/T$$ function. 

10. An error In the RKll overlapped seek driver which would 
occasionally result In a device timeout. 

11. Incorrect tape positioning on magtape file structured 
OPEN ... FOR OUTPUT If the file did not already exist on the 
tape. The file was written beyond the logical end of tape. 

12. An error In FILCOM which caused random Incorrect results. 

13. Incorrect reporting of free disk blocks by SYSTAT and VT5DPY. 

14. Problems In RUNOFF with auto-paragraph mode, multiple "Print 
Index" commands, and underlining. 
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RSTS/E V06A-02 SYSTEM NOTES Sequence 

RSTS/E SYSGEN 

PROBLEM WITH RFll SYSTEM GENERATION DISK — SYSGEN PATCH 1.1.1 

PROBLEM WITH RFll SYSTEM DISK — SYSGEN PATCH 1.1.2 

RETRACTION 1.1.3 

RUNNING WITH NO SWITCH REGISTER OR DISPLAY LIGHTS 1.1.4* 

MAGTAPE LABELLING DEFAULT 1.2.1 

OVERLAPPED SEEK DRIVER FOR RP11-C/RP0 3 DISK SUBSYSTEM 1.3.1 

CDll UNIBUS ADDRESS 1.3.2 

GENERATING RSTS/E V06A-02 FOR A PDP-11 WITH RP05 DISKS 1.3.3* 

INSUFFICIENT CONTIGUOUS SPACE SYSTEM GENERATION 1.4.1 

RSTS ''E EXECUTIVE 

STACK LIMIT WARNING MESSAGE — OPTIONAL INIT PATCH 2.1.1 

RPOl AND/OR RP03 ERRORS LOGGED AT START OF TIMESHARING 2.1.2* 

SWAP . SYS FILE PROBLEM 2.2.1 

LOSS OF USABLE SPACE ON FIXED HEAD SWAPPING DISKS 2.2.2 
REFRESHING A SYSTEM DISK AFTER REPLACING MONITOR CIL MAY CAUSE 

DOUBLY ALLOCATED BLOCKS 2.2.3 

ACCOUNTING ROUTINES 2.3.1* 

CORRECT OPERATION OF FORTRAN IV 2,3.2* 

REPLACE COMMANDS 2.4.1 

COMPILE COMMAND 2.4.2 

DELETION OF WRITE-PROTECTED FILES 2.4.3 

PROTECTION VIOLATION WHEN SAVEING FILES 2.4.4 

PROTECTION CODE OF <0> CANNOT BE WRITTEN 2.4.5 

ERROR IN 2741 CALL 360 BASIC CODE CONVERSION TABLE 2.5.1* 

RANDOM TERMINAL OUTPUT ON DHll LINES 2.5.2* 

SCANER UTILITY FOR FINDING PATCH LOCATIONS 2.5.3* 

HUNG TELETYPE ERRORS 2.5.4* 

INCORRECT CURSOR POSITIONING WHEN ECHO IS DISABLED 2.5.5* 

CRASH CAUSED BY DISABLED DHll LINES 2.5.6* 

2741 TERMINAL INTERFACE WIRING 2.6.1 

2741 HARDWARE OPTIONS REQUIRED BY RSTS/E 2.6.2 

NOTE ON LOWER AND UPPER CASE CHARACTERS 2,6.3 

NOISY TELEPHONE LINES 2.6.4 

HUNG TELETYPE ERRORS ON DCll LINES 2.6.5 

UNDERSTANDING SYNCHRONIZATION DELAYS 2.6.6 

TERMINAL FILL CHARACTERS 2.6.7 

KEYBOARD ASSIGNMENTS — OPTIONAL FILE PROCESSOR PATCH 2.7.1 

MAGTAPE DENSITY/PARITY DEFAULTS — OPTIONAL FILE PROCESSOR PATCH 2.7.2 

PROBLEM WITH FILE DELETION FUNCTION 2.8.1 

USER FILE DIRECTORIES 2.8.2 

FILE PROTECTION CODES 2,8,3 

SPECIAL LINE PRINTER DRUMS — OPTIONAL DRIVER PATCH 2,9,1 

RP04 POSITION FAILURE 2,9,2*t 

DIFFERENCES BETWEEN DEC AND IBM CARD CODES 2.9.3 

RP04 TEMPORARY UNSAFE CONDITIONS 2.9.4* 

LINE PRINTER INTERRUPT VECTOR ASSIGNMENTS 2.9.5* 

CRll CARD READER NOTES 2.10.1 

CRll CARD READER NOTES 2.10.2 

*Patch 
tReplacement 



This is a complete listing of all articles for RSTS/E and its subordinate or related 
products. In the case of related software, missing sequences pertain to problems 
unique to other versions of the same product; they also can indicate problems unique 
to interaction with other major operating systems, EXTRACTED articles are indicated: 
EXTRACTION. 
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RSTS/E BASIC-PLUS 

PROBLEM WITH "SAVE" AND "REPLACE" — BASIC PATCH 3.1.1 

AUXILIARY LIBRARY ACCOUNTS — OPTIONAL SYSTEM PATCH 3.1.2 

SPECIAL PRINT USING OPTIONS — OPTIONAL BASIC PATCH 3.1.3 

ARRAY DATA DESTROYED BY I/O BUFFER ALLOCATION 3.1.4* 

CHANGING DEFAULT SCALE FACTOR 3.1.5* 

THE LEXICAL ANALYZER DOES NOT POOL LITERAL FLOATING POINT 1 3.1.6* 

SUBSCRIPTING ERRORS 3.1.7* 

MAT INVERSE FAILS AT SCALE FACTOR 6 3.1.8* 

IMMEDIATE MODE "RETURN" 3.1.9* 

FILE NOT CLOSED PROPERLY 3.1.10* 

PRIVILEGED PROGRAM CHAINING TO A .HAS FILE 3.1.11* 

MEMORY MANAGEMENT VIOLATIONS USING SPACE$ 3.1.12* 

REDIMENSIONING CAUSES ERRORS 3.1.13* 

REPLACE MAY. DELETE A PROGRAM WITHOUT REPLACING IT 3.1.14* 

COMPILED PROGRAM INCOMPATIBILITY 3.2.1 

SOURCE LEVEL STATEMENTS IN BASIC 3.2.2 

SIMULTANEOUS ACCESS TO A FILE BY MANY USERS 3.2.3 

PASSING EOT MARK ON MAGTAPE 3.2.4 

AN "ON ERROR GO TO" WITH AN INCORRECT TARGET STATEMENT NUMBER 3.2.5 

INPUT GIVING CONFUSING RESULTS 3.2.6 

FLOATING POINT NUMBERS THAT APPEAR TO BE EQUAL 3.2.7 

SETTING VT05 FOR UP (?) CURSOR 3.2.8 

SCALE FACTORS FOR V06A-02 3.2.9 

OBTAINING JOB NUMBER USING THE PEEK FUNCTION 3.2.10 

PROGR.\M LOST-SORRY MESSAGES 3.2.11* 

TRUE-FALSE VALUES AND THE NOT OPERATOR 3-2.12 

FLOATING POINT ANAMOLIES 3.4.1 

MANIPUL' ION OF VIRTUAL STRINGS CONTAINING NULL BYTES 3.8.1 

RSTS/E UTILITIES 

POSSIBILITY OF ZEROING AN ACCOUNT 4.2.1 

BACKING UP RP03 OR RP04 4.2.2 

BACKUP PUBLIC-TO-PUBLIC DISK TRANSFERS 4.2.3 

BACKUP CLUSTERSIZE ERRORS 4,2.4* 

RETAINING ORIGINAL CREATION DATES WITH BACKUP 4.2.5* 

BACKUP FAILS TO RETAIN PROTECTION CODE 4.2.6* 

BACKUP DETACH PROBLEM 4.2.7* 

BATCH DOES NOT WORK WITH DECIMAL ARITHMETIC 4.3.1 

CREF GOES INTO AN INFINITE LOOP 4.6.1* 

USING WILDCARD COMMANDS WITH DIRECT 4.7.1* 

SETTING TERMINAL SPEEDS 4.16.1 

HANGING $INIT 4.16.2 

RUN BURST NOT RESET IN LOGIN 4.2 0.1* 

COPYING .BAG PILES TO DECTAPE 4.25.1 

COPYING A FILE INTO THE SAME ACCOUNT WITH SAME NAME 4.25.2 

MISCELLANEOUS PROBLEMS 4.25.3* 

FAILURE TO INITIALIZE QUEUE. SYS FILE — QUEMAN 4.29,1 

QUEUING FROM MAGTAPE 4.29.2* 

UNDERLINING TEXT WITH RUNOFF 4.35.1* 

PROBLEMS WITH RUNOFF 4.35.2* 

QUEMAN FAILS TO RESPOND TO SHUTUP ' S SECOND QUEMAN MESSAGE 4.36.1* 

USER ACCOUNT PROTECTION 4.39.1 

TTYSET HANDLING OF A VT50H 4.42.1 

RSTS/E SYSTEM DOCUMENTATION 

INCORRECT ORDER NUMBER FOR A DISK CARTRIDGE 5.2.1 

CONCISE COMMAND LANGUAGE (CCL) 5.2.2 

CHANGING LOGIN 5.3.1 

ERROR IN SYSTEM USER'S GUIDE FOR RSTS/E 5.4.1 

RETRACTION 5.5.1 

ERROR IN EXAMPLE PROGRAM DESCRIBING THE XLATE FUNCTION 5.5.2 

ANALOGOUS IF THEN STATEMENT CONTAINS A LOGIC ERROR 5.5.3 

CHANGING LOGIN 5.6.1 

RETRACTION 5.6.2 

DATA RETURNED IN MONITOR TABLE PART II SYS CALL 5.6.3 

DISABLE TERMINAL SYS CALL (F0=8) ON SYSTEM CONSOLE (KBO:) 5.6.4 



24 



ERROR IN ACCOUNTING DUMP SYS CALL TO FIP 
INCORRECT DESCRIPTION OF LOGOUT SYS CALL 
CON\^RTING NUMERIC DATA 
USING ASCII I/O FOR SCRATCH DATA FILES 

COBOL- 11 VOl.OA 

COBOL LINAGE CLAUSE 

PAGE FORMATTING WITH UNDESIRABLE LINAGE 

DATA ITEM LENGTH RESTRICTION 

COBOL AND UNLABELED TAPES ON RSTS/E 

COBOL- 11 V2 

OPEN STATEMENT TO TERMINALS FAILS 

COBRG TOO BIG FOR STANDARD COBOL COMPILER 

CROSS REFERENCE PROBLEM 

GO TO RESERVE WORD PROBLEM 

UNSTRING VERB USING NONINTEGER DATA ITEMS 

RECORD SIZE APPEARS AS FOUR ASCII BYTES 

RSTS/E 2780 EMULATOR 

278 PACKAGE NOTE 

EXCESSIVE I/O ERRORS 

REPORTING PROBLEMS WITH 2780 

INSTALLING AND TROUBLESHOOTING 2780s 

IMPROPER HANDLING OF RECEIVED EOT 

LOST AND DUPLICATE RECORDS 

2780 HANDLER FAILURE ON NAK/TIMEOUTs 

RECEIVE ERROR MESSAGES AND CRASHES CAUSED BY THE 2780 PACKAGE 

IMPROPER ZEROING OF LARGE BUFFER 

RUNNING THE 278 ON A DUPll INSTEAD OF A DUll 

2780 TIMING OUT IN RECEIVE MODE 

RSTS-11 SORT 

INCORRECT BUILD DIRECTIONS FOR NINE-TRACK MAGTAPE DISTRIBUTION OF SORT 

PARTIAL KEY EXTRACTION FEATURE OF SORT DOES NOT FUNCTION PROPERLY 

SORT RESTRICTS THE LENGTHS OF FILE SPECIFICATIONS 

KEYDMP WILL NOT RETURN PROPERLY TO SORT 

FATAL BASIC-PLUS ERRORS IN MQWIK 

EXTRA BLOCK IN OUTPUT FILE WHEN SORTING TYPE 1 FILE WITHOUT HEADER 

SQWIK DESTROYS KEY FILE HEADER 

SQWIK LOOPS OR USES UNDUE A.MOUNTS OF TIME TO SORT 

ALGORITHM PROBLEM 

SORTING A FILE WITHOUT RECORDS 

PARTIAL KEY EXTRACTION DOES NOT FUNCTION PROPERLY 

XQWIK.BAS DOES NOT ACCEPT A TYPE 1 DATA FILE WITH SIX-BYTE RECORDS 

CORRECTION OF PARTIAL KEY EXTRACTION DESCRIPTION 

RSTS/E COMMERCIAL EXTENSIONS 

CREATION OR REORGANIZATION RESULTS IN INFINITE LOOP 

NUMBER OF RECORDS IN INPUT DATA FILE CALCULATED INCORRECTLY 

NO ERROR MESSAGE IS GIVEN IF INPUT AND OUTPUT NAME THE SAME 

ERROR IN DRF SIZE DURING REORG 

CERTAIN KEY INDEX FILE SIZES CAUSE INFINITE LOOP 

STRTAD ENTRY IN FDB IS NOT ALWAYS RESET 

BLANK RECORDS IN A DATA FILE MAKE INDEX OPTION FAIL 

lAM VERIFY CANNOT HANDLE TOTALLY FULL FILES 

USING FND% MORE THAN ONE lAM FILE 

RECORDS ADDED TO lAM FILES THROUGH FNA% IN SPITE OF OCCURRENCE OF ERROR 

CONVERSION OF DATA FROM THE 4-WORD DECIMAL ARITHMETIC PACKAGE 
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10.9.1 



*Patch 
tReplacement 
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RSTS/E FORTRAN IV V06A-02 
UNDERFLOW DETECTION IN FORTRAN OTS 
NULL ARGUMENTS IN FORTRAN SUBSCRIPT LISTS 
INCORRECT PROTECTION CODES FOR UTILITIES 
■OBJECT TIME HOLLERITH FORMAT PROBLEM 
ENCODE/DECODE WITH OBJECT-TIME FORMATTING 
OPENING FILES IN APPEND MODE 
CALL OPEN OF DIRECT ACCESS FILE FAILS 
I-FORMAT CONVERSION ERROR 

COMPUTE-BOUND PROGRAMS MAY ABORT PREMATURELY 
J=J-J GIVES INCORRECT RESULTS 
TRAP TO 4 CORRUPTS PROTECTION CODE 

MISSING LEFT QUOTE IN CALL STATEMENT CAUSES COMPILER TO TRAP 
END OF FILE NOT RECOGNIZED FROM KEYBOARD 
CALL OR FUNCTION ARGUMENTS MAY CAUSE COMPILER TO TRAP 
CLARIFICATION: COMPARING ASCII DATA ITEMS 

SORT-11 VI, V2 for RSTS/E V06A-02 
REASSIGNING SCRATCH FILE 
DOCUMENTATION UPDATE 

RPG II V7.0 4 

RUNNING RPGESP VIA CCL COMMAND 
RUNNING RPGXEQ VIA CCL COMMAND 
REPLACEMENT PAGES (RPG II USER'S GUIDE) 
READING PACKED & BINARY RECORDS 
INDEXED PROCESSING WITHIN LIMITS 



*Patch 
tReplacement 
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SORWARE DISRMCH 


RSTS/E 


August 1975 



PROBLEM WITH RFll SYSTEM GENERATION DISK - SYSGEN PATCH 



THE SYSLOD program supplied with the RSTS/E V06A-02 magtape 
and DECtape distribution kits will not correctly load the 
DOS/BATCH monitor onto an RFll Fixed Head Disk. If the RFll Is 
used for the RSTS/E System Generation Disk (regardless or whether 
or not the resultant RSTS/E System Disk will also be the RFll)^ a 
special procedure must be followed to load a correct copy of the 
DOS Monitor before proceeding with the system generation. The 
Incorrect DOS Monitor works sufficiently well to perform the 
procedure presented below but will not make It through the full 
system generation. 



The first several steps 
are performed normally as 
Generation Manual and shown I 
Ts to Toa3 the DOS/BATCH 
distribution DECtape or magta 
In the Incorrect copy of 
completes/ answer the subseq 
DOS/BATCH Monitor. Normal 1 
from the distribution tape, 1 
start the batch generation 
performed^ CILUS Is run from 
copy of the monitor. 



In the system genera 
described In the 

n the example below, 
monitor onto the 

pe. This Is the step 
the DOS monitor. 

uent questions and 

y, the next step woul 

oad the first SYSGEN 
procedure. Before 

the distribution tape 



tlon procedure 

RSTS/E System 

The first step 

RFll from the 

that results 

After SYSLOD 

log Into the 

d be to run PIP 

batch file/ and 

these steps are 

to load a new 



Once the new copy of the 
several questions and login 
distribution tape to delete the 



monitor Is loaded, answer the 

a second time, run PIP from the 

old monitor and to load the 



SYSGEN batch file. The 
error. 



system genercition then 



proceeds 



w I thuu t 



In the example below, commands which must be entered are 
underlined. Text and prompt characters printed by the DOS 
Monitor are not underlined. All commands are terminated with a 
carriage return. 
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SOFTWARE PRODUCT 

RSTS/E SYSGEN 


VERSION 

V06A-02 


COMPONENT 

SYSGEN PATCHES 


VERSION 

N/A 


SUBPROGRAM OR ADDITIONAL INFORMATION 

RFll System Generation Disk 


SEQUENCE 
1.1.1 


PAGE 
OF 

1 3 


NEW REPLACEMENT ARTICLE 


ORIGINAL DATE 



SORWARE DISRflJCH 



RSTS/E 



August 1975 



SYSLOD V08-X2A 
CONSOLE FILL COUNT=ii 
DATE: q-JUN-75 
DIALOGUE? 



Normal procedures apply 
until noted below. 



» DF:MQNLIB.CIL/CQ!Q/HO /BQ<xx!MONLIB.LCL xx - DT, MT, or MM 
SYSLOD COMPLETE 

ANSWER WITH CARRET OR 'Y' CARRET:- IS YOUR LINE FREQ. 50 HERTZ? 
DO YOU WANT TO DISABLE DIALOGUE FOREVER? NQ 

DOS/BATCH V9-20C 

DATE: 9-JUN-75 

TIME: 12;PQ 

DIALOGUE? I£S. 

DO YOU WANT TO RESET CONSOLE FILL COUNT? liS 

FILL COUNT=i 

ARE ANY DEVICES DOWN? M 

DO YOU WANT TO CHANGE LINE PRINTER? M 

HAVE YOU GOT RK02 DISKS ? m 



DATE:-09-JUN-75 
TIME:-12:00:05 

$MN xx;Cll,U§ 

CILUS V08-X6A 



<Altered procedure begins here> 



# MONLIB.NEW/HQ/BO<xx! M0NLIB.LCL/L0 



<Load new monItor> 



ANSWER WITH CARRET OR 'Y' CARRET:- IS YOUR LINE FREQ. 50 HERTZ? 
DO YOU WANT TO DISABLE DIALOGUE FOREVER? M 



SOFTWARE PRODUCT 

RSTS/E SYSGEN 


VERSION 

V06A-02 


COMPONENT 

SYSGEN PATCHES 


VERSION 

N/A 


SUBPROGRAM OR ADDITIONAL INFORMATION 

RFll System Generation Disk 


SEQUENCE 
1.1.1 


PAGE 


NEW REPLACEMENT ARTICLE 


ORIGINAL DATE 
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SOFTWARE DISPATCH 


RSTS/E 


AuKust 1975 



DOS/BATCH V9-20C 

DATE: 9«JUN-75 

TIME: 12:10 

DIALOGUE? XLl 

DO YOU WANT TO RESET CONSOLE FILL COUNT? 1£S 

FILL COUNT=i 

ARE ANY DEVICES DOWN? M 

DO YOU WANT TO CHANGE LINE PRINTER? XII 

LSll? M 

HOW MANY COLUMNS ? Hi 

LOWER CASE? NQ 

OVERPRINT? m 

HAVE YOU GOT RK02 DISK? M 

$ifl 1x1 

DATE:-09-JUN-75 
TIME:-12:10:15 

PIP VlO-02 

#MONLIB.CIL/PR!Q 

#MONLIB.CIL/DE 






inn t V t vMwn 



<Normal procedures resume here> 



• KI 

$eATCH ?Y§q£N 

<Fonow the System Generation Manual from here on> 
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SOFTWARE PRODUCT 

RSTS/E SYSGEN 



COMPONENT 

SYSGEN PATCHES 



SUBPROGRAM OR ADDITIONAL INFORMATION 

RFll System Generation Disk 



NEW 



REPLACEMENT ARTICLE 



VERSION 

V06A-02 



VERSION 

N/A 



SEQUENCE 
1.1.1 



PAGE 
OF 

3 3 



ORIGINAL DATE 



SOFTWARE DISBMCH 


RSTS/E 


August 1975 



PROBLEM WiTK RFll SYSTEM DISK - SYSGEN PATCH 



The RSTS/E V06A-02 Initialization Code cont 
address which will prevent correct operation of 
from an RFll/RSll system disk. The newly gene 
loaded onto the RFll and bootstrapped us In 
SYSLOD during the final step of the system gen 
The problem will cause an unrecoverable error 
phase of the Initialization Code when the 
bootstrapped. Since the error Is fatal. It I 
use the PATCH option of the Initialization Code 
problem. Consequently, the error must be correc 
patch when the Initialization Code Is linked. 



alns an Incorrect 

the RSTS/E system 

rated system Is 

g either CILUS or 

eratlon process. 

during the CILUS 

new system Is 

s not possible to 

to correct the 

ted with a global 



To Install the patch at L 
made to the system generation 
editor (EDIT). The edit Is 
configuration questions are an 
to ask If you have any special 
either the configuration file 
message Indicates the correct 
generation and restart the 
this case there Is an edit to 
aborted, the edit made, an 
complete procedure to make the 
EDIT commands. Is shown In the 



INK time, several changes 
batch file SYSGEN.BAT us I 

performed Immediately 
swered. SYSGEN stops at 

requirements which requi 

or the batch generation 
procedure to Interrupt t 
process after changes are 
perform so the system gen 
d the batch process resta 

change. Including the 

example below. 



must be 
ng the DOS 
after the 
this point 
re editing 
file. The 
he system 

made. In 
eratlon Is 
rted. The 

necessary 



NOTE: This procedure only applies to RSTS/E V06A-02 systems 
which use the RFll Fixed Head Disk as the system disk. 
If an RFll disk Is used as a swapping disk, the patch 
described here Is not required. 



PROCEDURE: 



Follow the standard system generation procedures and answer 
all the configuration questions. SYSGEN will then print the 
message shown below. Follow the example exactly as shown to make 
the required change to the SYSGEN.BAT file and to resume the 
system generation. In this example, all commands which must be 
entered are underlined. Text and prompt characters printed by 
the DOS monitor or by EDIT are not underlined. 
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SOFTWARE PRODUCT 

RSTS/E SYSGEN 


VERSION 

V06A-02 


COMPONENT 

SYSGEN PATCHES 


VERSION 
N/A 


SUBPROGRAM OR ADDITIONAL INFORMATION 

RFll System Disk 


SEQUENCE 
1.1.2 


PAGE 
OF 

1 2 


NEW REPLACEMENT ARTICLE 


ORIGINAL DATE 



SORWARE DISPATCH 



RSTS/E 



August 1975 



<Conf Iguratlon Dialogue Questlons> 

SYSGENrIF YOU HAVE ANY SPECIAL REQUIREMENTS WHICH REQUIRE 
SYSGENtEDITING EITHER THE CONFIGURATION FILE (CONFIG. MAC) 
SYSGEN:OR THE BATCH GENERATION FILE (SYSGEN.BAT), ABORT 
SYSGEN:NOW BY TYPING "CONTROL/C" AND THEN "TE". RESUME AT 
SYSGEN:THIS POINT BY TYPING "BATCH SYSGN2". OTHERWISE^ 
SYSGEN:TYPE "CO" TO CONTINUE WITH SYSTEM GENERATION : 



A050 000000 

$+C 

.TS<cr> 

TIME:-12:10:2U 
DOS/BATCH V9-20C 

%Bm xx;^PIT 

EDIT-ll V07-03 



Abort the system generation 
here with CONTROL/C and TE 



XX = DT^ MT, MM, or DK 

<cr> denotes carriage return 



» SYSGEN.BAT <SYSGEN.BAT<cr> 
*H/B;22QQ0/A-3JC<cr> 

Q< cr> 

»ABSPAT»INI T;30572:177U6Q<cr> 

*-?L<:cr> 

#INIT/SQ, INIT<RSTS.STB/B:22000,INITl,INIT2,ODTJPTCH,LA30S/O 

#ABSPAT=INIT:30572:177'i60 

#/E 

*EX<;cr;> 



<1f> denotes line feed 



. KI<cr> 

$MI£ti SYSGN2<cr> 

$JOB SYSGN2(1,1) 
TIME:-12:13:53 



Exit from EDIT wl th 
CONTROL/C and Kl 

Restart batch generation 

These messages appear 
as batch restarts. 



Normal procedures apply from here on. Batch will print 
further Instructions about mounting tapes or disks as required. 



SOFTWARE PRODUCT 

RSTS/E SYSGEN 


VERSION 

V06A-02 


COMPONENT 

SYSGEN PATCHES 


VERSION 

N/A 


SUBPROGRAM OR ADDITIONAL INFORMATION 

RFll System Disk 


SEQUENCE 
1.1.2 


PAGE 
« OF „ 

2 2 


NEW REPLACEMENT ARTICLE 

1X1 


ORIGINAL DATE 
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RSTS/E Software Dispatch 
June 1976 



RUNNING WITH NO SWITCH REGISTER OR DISPLAY LIGHTS 



PROBLEM: Some n«w PDP-11 processors, such as the 11/34, do not 
have a console switch register or display lights. If a RSTS/E 
V06A-02 system is brought up on such a machine, it will 
immediately fall when it attempts to access the switch register 
and display light location (777570). 



DISPOSITION: The following modification to the SYSGEN procedure 
corrects the problem. When the SYSGEN dialogue is complete, the 
following message appears on the console terminal: 

SYSGEN:IF YOU HAVE ANY SPECIAL REQUIREMENTS WHICH REQUIRE 
SYSGEN:EDITING EITHER THE CONFIGURATION FILE (CONFIG. MAC) 
SYSGEN:OR THE BATCH GENERATION FILE (SYSGEN.BAT), ABORT 
SYSGEN:NOW BY TYPING "CONTROL/C" AND THEN "TE". RESUME AT 
SYSGEN:THIS POINT BY TYPING "BATCH SYSGN2". OTHERWISE, 
SYSGEN:TYPE "CO" TO CONTINUE WITH SYSTEM GENERATION : 

A050 000000 
$ 

At this point, interrupt the batch stream by typing "CONTflOL/C" 
and then "TE"<CR>. Then type the following commands to edit the 
configuration file (the symbol "<CR>" denotes typing the carriage 
return key and "<LF>" denotes typing the line feed key). The 
computer r'esponses are underlined: 

DOS/B ATCH V9-20C 

iR EDIT<CR> 
EDIT-11 V07-03 

iCONFIG.MAC_CONFIG.MAC<CR> 

1H;MULTTY;AI<CR> 

SWR$R=0<CR> 

SWR$W=0<CR> 

<LF> 

1EX<CR> 

it'C (TYPE "CONTROL/C") 

^KI<CR> 

IBATCH SYSGN2<CR> (TO RESUME THE SYSGEN PROCESS) 

Notes : 

1) With the switch register disabled the crash dump and 
auto-restart will always occur (i.e. as if the switch 
register were 177777). 

2) STATS (if configured in) will be constantly kept. 

RSTS/E SYSGEN V06A-02 Seq 1.1.4* 

SYSGEN PATCHES 1 of 1 
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RSTS/E Software Dispatch 
January 1976 



Magtape Labelling Default 



When creating a new V06A-02 system, the MAGTAPE 
LABELLING DEFAULT question Is asked during execution 
of the DEFAULT option of the Initialization Code. 
Either DOS or ANSI Is an acceptable answer with no 
preference given In the manuals. Since the System 
Library magtape Is written In DOS format/ the normal 
library build procedures will not work correctly If 
ANSI labelling Is selected. Furthermore, the ASSIGN 
MTn:.DOS command cannot be used to establish a label 
default under timesharing (I.e., prior to running 
BUILD) since the assignment would restrict use of the 
magtape drive to one job and two different jobs are 
used during the library build process. The BUILD 
program Itself Is a job which detaches and logs In a 
second job to execute commands from the build control 
files. The magtape drive cannot be assigned to either 
job since both require use of the drive at different 
times. 

The only way around this problem Is to specify DOS 
labelling when the system Is brought up for the first 
time. The library build procedures will then work as 
Intended. The labelling default can be changed to 
ANSI at a later time by executing the DEFAULT option 
of the Initialization Code. 



SOFTWARE PRODUCT 

RSTS/E SYSGEN 


VERSION 
V06A-02 


COMPONENT 
SOFTWARE NOTES 


VERSION 
N/A 


SUBPROGRAM OR ADDITIONAL INFORMATION 


SEQUENCE 
1.2.1 


PAGE 
1 0'=2 


NEW REPLACEMENT ARTICLE 


ORIGINAL DATE 

Deceiriber 1975 
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RSTS/E Software Dispatch 
January 1976 



Magtape Labelling Default page 2 of 2 



A similar problem can occur when trying to OLD a 
program from a tape created by BACKUP. The BACKUP 
utility alwa^ writes DOS labelled tapes regardless of 
the system magtape labelling default (i.e., BACKUP 
creates DOS labels and writes the tape non- 
file-structured). If ANSI is the system labelling 
default, an OLD from a tape created by BACKUP will not 
work. In this case, however, the ASSIGN MTnt.DOS 
command prior to doing the OLD will eliminate the 
problem. 
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SOFTWARE DISRaJCH 


RSTS/E 


August 1975 



OVERLAPPED SEEK DRIVER FOR RP11-C/RP03 DISK SUBSYSTEM 

The RPll-C controller allows several RP0 3 drivers to perform seek 
operations simultaneously. On systems with more than one RP03 
drive, the standard RSTS/E V06A-02 software automatically includes 
an overlapped seek driver unless the non-overlapped driver is 
explicitly selected. This procedure is described in the RSTS/E 
System Generation Manual . 



CAUTION 

A hardware ECO to the RPll-C controller 
must be installed for the overlapped 
seek driver to operate properly. The 
specific ECO is RPllC ECO #0008A. Th.e 
RSTS/E system hangs if th.is ECO is not 
installed. 



SOFTWARE PRODUCT 
RSTS/E SYSGEN 


VERSION 
V06A-0 2 


COMPONENT 

Hardware Notes 


VERSION 
N/A 


SUBPROGRAM OR ADDITIONAL INFORMATION 


SEQUENCE 
1.3.1 


PAGE 
1°^1 


NEW REPLACEMENT ARTICLE 


ORIGINAL DATE 
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SORWARE DISfATCH 


RSTS/E 


August 1975 



CPU UNIBUS ADDRESS 

The standard UNIBUS address for the CDll high- speed card reader 
(1000 CPM or 1200 CPM) has been changed by CDll ECO #13. The pre-ECO 
address was 172460. The new address is 177160, which is the same 
bus address used for the CRll card reader. Th^e CDll interrupt vector 
at 230 is not affected by the ECO. The interrupt vector for the CDll 
has always been the same as the vector assigned to the CRll. The 
address change was necessary due to a conflict between CDll and 
RH11/TM02/TU16 address assignments. Note that it is not possible 
to operate the TJU16 magtape subsystem and the CDll card reader on 
the same system until the CDll ECO has been installed. 

RSTS/E V06A-02 assumes the new UNIBUS address for the. CDll. However, 
since the ECO is recent and may not be installed on all CDll's in 
the field, RSTS/E does provide for operation of the CDll at th-e pre- 
ECO address (provided the system does not include any TU16 tape 
drives) . To operate the CDll at the pre-ECO address, the SYS GEN 
card reader query must be answered with an address modifier as 
shown below: 

CARD READER? CD/A: 172460 

The SYSGEN automatic answer facility will determine whether the CDll 
is configured for the pre-ECO address or the new address. The 
automatic answer for the pre-ECO address will appear as follows: 



CARD READER? 



**CD/A: 172460** 



This automatic answer should be accepted with the <line feed> response 
if the ECU cannot be installed immediately and no TUl6's are included 
in the hardware configuration. A new system generation will be re- 
quired to make the address change after the ECO is installed, however. 
No address modifier will appear in the auto-answer if the CDll is 
configured for the new address (i.e., th.e ECO has been installed). 
The standard response to the card reader question is used to configure 
the RSTS/E system for the new CDll address as shown below: 

CARD READER? CD 



CARD READER? 



**CD** <line feed> 
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SOFTWARE PRODUCT 
RSTS/E SYSGEN 


VERSION 
V06A-02 


COMPONENT 

Hardware Notes 


VERSION 
N/A 


SUBPROGRAM OR ADDITIONAL INFORMATION 
CDll UNIBUS 


SEQUENCE 
1.3.2 


PAGE 
1°^ 


NEW REPLACEMENT ARTICLE 


ORIGINAL DATE 



RSTS/E Software Dispatch 
May 1976 



GENERATING RSTS/E V06A-02 FOR A PDP-11 WITH RP05 DISKS 



PROBLEM: RSTS/E V06A-02 does not recognize the RP05 disk drive type 
in the RH11 controller. If a RSTS/E V06A-02 system is brought up on a 
machine with one or more RP05 disks, it will handle them erroneously. 
The following modification to the SYSGEN procedure corrects the 
problem . 



DISPOSITION: When the SYSGEN dialogue is complete, the following 
message appears on the console terminal: 



SYSGEN:IF YOU HAVE ANY SPECIAL REQUIREMENTS WHICH REQUIRE 
SYSGEN:EDITING EITHER THE CONFIGURATION FILE (CONFIG. MAC) 
SYSGEN:OR THE BATCH GENERATION FILE (SYSGEN.BAT), ABORT 
SYSGEN:NOW BY TYPING "CONTROL/C" AND THEN "T£". RESUME AT 
SYSGEN:THIS POINT BY TYPING "BATCH SYSGN2" . OTHERWISE, 
SYSGEN:TYPE "CO" TO CONTINUE WITH SYSTEM GENERATION : 

A050 000000 
$ 

At this point, interrupt the batch stream by typing CONTROL/C and 
then TE, Then type the following commands to edit the batch file 
(the symbol <CR> denotes typing the carriage return key, <LF> 
denotes typing the line feed key; the computer responses are 
underlined ) : 

iR EDIT<CR> 
EDIT-n V07-03 

£SYSGEN.BAT<SYSGEN.BAT<CR> 

iH;INIT/SQ;G;/E;-lC;0;AI<CR> 

)l(ABSPAT = INIT: 576 30: 101146:42716:4001 : 22627 : 20020 : 207<CR> 

#ABSPAT = INIT:30160:4737:57630: 1034:32704:4000: 141 3<CR> 

#/E<CR> 

<LF> (DO NOT OMIT THE '//' IN THE PREVIOUS 3 LINES) 

'^ E X^ C R ^ 

£tc (TYPE "CONTROL/C") 

j.KI<CR> 

iBATCH SYSGN2<CR> (TO RESUME THE SYSGEN PROCESS) 



PSTS/E SYSGEN V06A-02 Seq 1.3.3* 

HARDWARE NOTES 1 of 1 
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RSTS/E 


August 1975 



Insufficient Contiguous Space System Generation 



PROBLEM: 

After several system generations using DECpack (RK disk) distribu- 
tion, there may be insufficient contiguous space on the disk 
for CILUS scratch files. When this occurs, the system generation 
batch stream will abort with an FJ2)06 message. The DK0:/FR command 
to PIP (under DOS) will print the number of free blocks available 
on the disk. This count is misleading since there may be insuf- 
ficient contiguous space even though the number of free (noncontig- 
uous) blocks is large. 



DISPOSITION: 

The best solution is to always make a ROLLIN copy of the distribution 
disk supplied by DIGITAL and use a new copy for each system generation. 
The system generation DECpack supplied by DIGITAL should never be used 
for a system generation and should never be WRITE ENABLED for any 
purpose. This will prevent inadvertent destruction of the installation 
master pack and will allow copies to be made as required. Alternatively, 
of course, the same copy can be used repeatedly until the problem 
appears. A new copy must then be made to perform the system generation. 



SOFTWARE PRODUCT 
SYSGEN 


VERSION 
V06A-02 


COMPONENT 
DOS/BATCH Notes 


VERSION 


SUBPROGRAM OR ADDITIONAL INFORMATION 


SEQUENCE 
1.4.1 


PAGE 
1 OF 1 


NEW REPLACEMENT ARTICLE 

1 


ORIGINAL DATE 
June 1975 
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STACK LIMIT WARNING MESSAGE - OPTIONAL INIT PATCH 



RSTS/E systems normally require a programmable Stack Limit 
Register. The Stack Limit provides hardware protection from 
KERNEL mode stack overflows. Although stack overflow should 
never occur, the Stack Limit does provide a level of protection 
from hardware malfunctions or software problems In the Monitor. 
The programmable Stack Limit Register Is a standard feature on 
the PDP-11/70 and ll/it5 processors and Is available as an option 
on the PDP-11/I*0. 

The Initialization Code In RSTS/E V06A-02 will print a 
warning message If the Stack Limit Register Is not found at 
address milk. The message Is printed each time the system disk 
Is bootstrapped. If the register Is not present/ the system will 
not attempt to set the stack limit and will run without the 
option. 

If the PDP-11 Is not equipped with the programmable Stack 
Limit Register, It may be annoying to see the warning message 
printed on each boot. The patch below Is provided to disable 
printing of the message. 



PROCEDURE i 



1. This Is an optional patch to the RSTS/E V06A-02 
Initialization Code. The patch disables printing of a 
warning message on machines which are not equipped with a 
programmable Stack Limit Register. No load map Is required 
to Install the patch. 
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SOFTWARE PRODUCT 

RSTS/E Executive 


VERSION 

V06A-02 


COMPONENT 

INIT Patches 


VERSION 

N/A 


SUBPROGRAM OR ADDITIONAL INFORMATION 

Stack Limit Register 


SEQUENCE 

2.1.1 


PAGE 

1°^2 


NEW REPLACEMENT ARTICLE 

^ 1= 


ORIGINAL DATE 



SORWARE DISRMCH 


RSTS/E 


August 1975 



2. Bootstrap the RSTS/E system disk normally to load the 
Initialization Code Into memory. Then use the PATCH option 
of the INIT code to install the patch as shown below. 



WARNING ** THIS MACHINE DOES NOT HAVE A STACK LIMIT REGISTER! 
ALTHOUGH NOT ADVISED, RSTS/E WILL RUN WITHOUT THE OPTION. 



OPTION: PATCH 






MODULE NAME ? INIT 






BASE ADDRESS ? 023»*l»6 






OFFSET ADDRESS ? 






MODULE BASE OFFSET 


OLD 


NEW? 


INIT 023U«*6 000000 


005015 


? 000000 


INIT 0234146 000002 


0U0527 


? iC CONTROL/C EXIT 



OPTION: BOOT 

BOOT DEVICE ? <line feed> 



RSTS/E V05A-02 TEST SYSTEM 

(NO WARNING MESSAGE SHOULD BE PRINTED) 

OPTION: 



BOOT recommended to 
verify that patch 
has been installed 
correctly. 



SOFTWARE PRODUCT 

RSTS/E Executive 


VERSION 

V06A-02 


COMPONENT 

INIT Patches 


VERSION 

N/A 


SUBPROGRAM OR ADDITIONAL INFORMATION 

Stacic Limit Register 


SEQUENCE 
2.1.1 


PAGE 

2 ^^^2 


NEW REPLACEMENT ARTICLE 


ORIGINAL DATE 
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RSTS/E Software Dispatch 
January 1976 



RP02 and/or RP03 Errors Logged at Start of Timesharing 



PROBIiEM; 

On RSTS/E systems configured for an RP02 or RP03 system 
disk and the RP overlapped Seek Driver (i.e., all systems 
with 2 or more drives unless the non-overlapped driver was 
explicitly requested during SYSGEN), an RP1 1 /RP02./RP03 
error will be logged when the system is brought up for 
timesharing . 

The error is logged because the RP1 1 /RP02/RP03 attention 
lines are not cleared after the monitor and run time 
system are loaded by the INIT code. The effect is that an 
immediate attention interrupt occurs when RP11 interrupts 
are enabled for the first I/O operation to/from the system 
disk under timesharing. The overlapped seek driver will 
(correctly) log an error and ignore the interrupt. 

This problem does not affect system operation, but the 
mysterious error logged at start up may cause unnecessary 
concern. The patch presented below will cause the INIT 
code to clear the attention bits prior to the start of 
normal timesharing. 



PROCEDURE: 

1. This is a patch to the Initialization Code. Although 
it will only affect systems with an RP02 or RP03 
system disk, it can be installed on all V06A-02 
systems. A load map is not required to install the 
patch . 



SOFTWARE PRODUCT 
RSTS/E Executive 


VERSION 

V06A-02 


COMPONENT 
INIT Patches 


VERSION 
N/A 


SUBPROGRAM OR ADDITIONAL INFORMATION 


SEQUENCE 

2.1.2* 


PAGE 
1°^ 2 


NEW REPLACEMENT ARTICLE 

CZ] CD 


ORIGINAL DATE 
January 1976 
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RP02 and/or RP03 Errors Logged At Start of Timesharing page 2 of 2 



2. Bootstrap the RSTS/E system disk normally to load the 
Initialization Code into memory. Then use the PATCH 
option of the INIT code to install the patch as shown below: 

OPTION: PATCH 
MODULE NAME ? INIT 
BASE ADDRESS ? 22000 
OFFSET ADDRESS ? IO3I6 

MODULE BASE OFFSET OLD NEW ? 

INIT 022000 010316 000131 ? 005060 

INIT 022000 010320 000000 ? 177774 

INIT 022000 010322 000000 ? 005560 

INIT 022000 010324 000000 ? 177774 

INIT 022000 010326 000000 ? OOOI3I 

INIT 022000 010330 000000 ? fC CONTROL/C 

Exit 

OPTION: BOOT BOOT required to load altered 

INIT code into memory. 

BOOT DEVICE ? <LF> Line Feed boots the system disk 

RSTS V06A-02 TEST SYSTEM 

OPTION: 
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SWAP. SYS FILE PROBLEM 

In RSTS/E V06A-0 2 systems there are four possible swap files called 
SWAPO.SYS, SWAPl.SYS, SWAP2.SYS, and SWAPS. SYS. In RSTS/E V05-21 
and all field test versions of V05B (not V05B-24 or V05C-01) , only 
one file called SWAP. SYS could be created. 

The difference in swap file names presents a problem if a V06A-02 
system replaces an old system on a system disk which contains the 
V05-21 or early V05B SWAP. SYS file (not V05C-01) = If a swapping disk 
exists on the machine, the SWAP. SYS file would normally reside on 
that disk for efficient swapping. The retrieval information for 
SWAP. SYS would exist in the UFD for account [0/1] on the system disk, 
however. When the REFRESH initialization option sets up the Storage 
Allocation Tables (SAT) for the system and swapping disk(s) , it has 
most or all of the swapping disk space allocated to the SWAP. SYS 
file. The REFRESH routines in V06A-0 2 systems cannot delete this 
old swap file. Hence, there is no apparent way to free up the swapping 
disk space. 

Similarly, if the system does not include a swapping disk, the old 
SWAP. SYS file exists on the system disk. Since this file could be 
very large and can not be deleted, there is wasted space on the system 
disk. 

To solve the problem, move the old SWAP. SYS file to the system disk 

(if it resides on a swapping disk) using REFRESH under the old 

system before the old CIL is replaced. Reduce the size of the SWAP. SYS 

file to the absolute minimum of 32 blocks and thereby minimize wasted 

space on the system disk. The SWAP. SYS file remains on the system 

disk. After the old CIL is replaced with the V06A-0 2 system CIL, 

any space on a swapping disk previously occupied by SWAP. SYS is available 

for the V06A-02 swapping files. 

This problem does not affect new V06A-02, V05C-01, or V05B-24 installations 
since the old SWAP. SYS file does not exist. The problem shows up if 
a V06A-02 system replaces a V05-21 CIL on the system disk leaving the 
existing file structure intact. 
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SOFTWARE PRODUCT 

RSTS/E Executive 


VERSION 
V06A-02 


COMPONENT 

INIT Notes 


VERSION 
N/A 


SUBPROGRAM OR ADDITIONAL INFORMATION 


SEQUENCE 
2.2.1 


PAGE 
1 °^1 


NEW REPLACEMENT ARTICLE 

C3 


ORIGINAL DATE 



SOFTWARE DISBMCH 


RSTS/E 


January 1975 



Loss of Usable Space on Fixed Head Swapping Disks 



PROBLEM: 

When trying to utilize all of the space normally availeOsle on fixed 
head disks used as swapping devices, you will lose (pack cluster size) minus 
(device cluster size) blocks of usable space on your fixed head swapping 
disk if your system disk pack cluster size is greater theui the system 
disk device cluster size. All disks have a device cluster size of one 
except RP03s which have a device cluster size of two. Pack cluster size 
is established at DSKINT time. 



SOFTWARE PRODUCT 

RSTS/E Executive 


VERSION 
V06A-02 


COMPONENT 
INIT General Notes 


VERSION 


SUBPROGRAM OR ADDITIONAL INFORMATION 


SEQUENCE 
2.2.2 


PAGE 

1 O' 1 


NEW REPLACEMENT ARTICLE 


ORIGINAL DATE 
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REFRESHING A SYSTEM DISK AFTER REPLACING THE MONITOR GIL MAY CAUSE 
DOUBLY ALLOCATED BLOCKS 



PROBLEM: When a RSTS/E V06A-02 monitor CIL is used to replace an 
existing system CIL (as described in Section 2.9.2 of the System 
Generation Manual) , attempts to REFRESH the system disk may generate 
the error message: 

CLEAN FOUND A DOUBLY ALLOCATED BLOCK 

This will occur if the new system is generated for fewer swapping 
disks than the old system or for different types or sizes of swapping 
disks and if any of the swapping disks are in use by the old system 
at the time of the replacement. 

DISPOSITION: Before replacing the old monitor CIL with a V06A-02 mon- 
itor CIL, REFRESH the system disk using the old monitor to remove all 
uses of the old swapping disks: 

1. If SWAPO.SYS is on a swapping disk, change it to have a minimal 
size (32 blocks) on the system disk (SYS) . 

2. If any other swap files are on SWP, delete them. 

3. If OVR.SYS or ERR. SYS is on SWP, move it into the CIL (answer the 
question CIL ? with YES) . 

4. If BUFF. SYS is on SWP, move it to SYS. 

After this REFRESH, the File Status Table should show no files that 
exist on SWPs Now reolace the monitor CIL, Once the new monitor is 
on the system disk, use REFRESH to move system files onto the new con- 
figuration of swapping disks, if any. 



RSTS/E EXECUTIVE V06A-02 Seg 2.2.3 

INIT NOTES 1 of 1 
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Accounting Routines 



PROBLEM: 

Kilo Core Ticks are not always reset at the start of a new 
job. The problem occurs when a user who is already logged 
into the system logs into the same or another account with 
the HELLO P,PN command. The high order bits of the KCT 
counter in the Job Data Block are not cleared in this 
case. The new job will be overcharged if the high order 
bits of the KCT counter are non-zero. 

SOLUTION : 

The following patch will correct the problem. 

PROCEDURE : 



This is 
Monitor . 
systems . 



a patch to the accounting routines in the 
It should be installed on all RSTS/E V06A-02 



Obtain a listing of the RSTS load map. This map was 
printed during System Generation if a line printer was 
available at that time. Otherwise, the map must be 
printed from the LICIL tape created at System 
Generation time (DECtape or magtape distribution) or 
from the System Generation DECpack (RK distribution). 
If obtaining the map from tape media, print the file 
RSTS. MAP from the LICIL tape using PIP under RSTS/E, 



SOFTWARE PRODUCT 

RSTS/E Executive 


VERSION 

V06A-02 


COMPONENT 

Monitor Patches 


VERSION 

N/A 


SUBPROGRAM OR ADDITIONAL INFORMATION 


SEQUENCE 
2.3.1* 


PAGE 
1 °^3 


NEW REPLACEMENT ARTICLE 

1= 


ORIGINAL DATE 
August 1975 
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Accounting Routines page 2 of 3 



the System Generation monitor, or any DOS monitor. If 
the media is DECpack, use Extended PIP with the /DOS 
switch to print the file RSTS.MAP from account [1,1] 
on the System Generation DECpack. Alternatively, 
bootstrap the System Generation DECpack, LOGIN under 
account [1,1], and use PIP under DOS to print the 
file. 

On the first or second page of the RSTS map under the 
heading "Program Section Allocation Synopsis" find the 
section <PATCH> and record the first number to the 
right of the section name (first column of numbers). 

[PATCH] = 



On about the 12th page of the RSTS load map, find the 
heading "**«TITLE: FIP IDENT:06A.02 FILE RSTS. OBJ". 
Scan down the left column for the section name <FIP> 
and locate the tag ALLTIM in the listing of global 
symbols. Record the number which appears immediately 
to the right of the tag ALLTIM. 

[ALLTIM] = 



Bootstrap the RSTS/E system disk normally to load the 
initialization code into memory. Then use the PATCH 
option of the INIT code to install the following patch: 
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OPTION: PATCH 

MODULE NAME? RSTS 

BASE ADDRESS? [ALLTIM] 

OFFSET ADDRESS? 104 

MODULE BASE OFFSET OLD NEW? 

RSTS [ALLTIM] 000104 042715 ? 00473? 

RSTS [ALLTIM] 000106 176000 ? [PATCH] 

RSTS [ALLTIM] 0.00110 052625 ? tC CONTROL/C Exit 



OPTION: PATCH 

MODULE NAME? RSTS 

BASE ADDRESS? [PATCH] 

OFFSET ADDRESS? 

MODULE BASE OFFSET OLD NEW? 

RSTS [PATCH] 000000 000000 ? 042715 

RSTS [PATCH] 000002 000000 ? 176000 

RSTS [PATCH] 000004 000000 ? 105061 

RSTS [PATCH] 000006 000000 ? 177767 

RSTS [PATCH] 000010 000000 ? 000207 

RSTS [PATCH] 000012 000000 ? fC CONTROL/C Exit 



OPTION 
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Correct Operation of FORTRAN-IV 



The FORTRAN-IV package will not run correctly due to 
the use of certain locations in the user's job image 
by the monitor. The monitor saves the user's context 
in the user's job image in order to be able to swap 
out that user. The locations currently used by the 
monitor affect the correct operation of the FORTRAN-IV 
package. The patch presented here will correct the 
problem . 



PROCEDURE: 



This is a patch to 
installed on all RSTS/E 
the FORTRAN-IV package. 



the monitor. It should be 
V06A-02 systems running 



Obtain a listing of the RSTS 1 
was printed during System Gener 
printer was available at that 
the map must be printed from 
created at System Generation 
magtape distribution) or f 
Generation DECpack ( RK di 
obtaining the map from tape medi 
RSTS. MAP from the LICIL tape 
RSTS/E, the System Generation mo 
monitor. If the media is DEC 
PIP under RSTS/E with the /DOS s 
file RSTS. MAP from account [ 



L 

( 

th 



oad map. 
ation j 

time . 
the 

time 
rom 
stributi 
a, print 

using 
nitor, o 
pack, us 
witch to 
1,1] on 



This map 

f a line 

Otherwise , 

ICIL tape 

DECtape or 

e System 

on). If 

the file 

PIP under 

r any DOS 

e Extended 

print the 

the System 



SOFTVI/ARE PRODUCT 

RSTS/E EXECUTIVE 


VERSION 
V06A-02 


COMPONENT 

MONITOR PATCHES 


VERSION 


SUBPROGRAM OR ADDITIONAL INFORMATION 


SEQUENCE 
2.3.2* 


PAGE 
1 °' 6 


NEW REPLACEMENT ARTICLE 

:z2 —i 


ORIGINAL DATE 
February 1976 
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Correct Operation of FORTRAN- IV 



Generation DECpack. Alternatively, bootstrap the 
System Generation DECpack, LOGIN under account 
[|,t], and use PIP under DOS to print the file. 

On the first or second page of the RSTS map under 
the heading "Program Section Allocation Synopsis" 
find the tag <PATCH> and record the first number 
to the right of the section name (first column of 
numbers) . 

[PATCH] = 



Now find the section <MON> and record first number 
to the right of the section name (first column of 
numbers) . 

[HON] = 



SOFTWARE PRODUCT 

RSTS/E EXECUTIVE 


VERSION 

V06A-02 


COMPONENT 

MONITOR PATCHES 


VERSION 


SUBPROGRAM OR ADDITIONAL INFORMATION 


SEQUENCE 

2.3.2* 


PAGE 
2 0'= 6 


NEW REPLACEMENT ARTICLE 

m en 


ORIGINAL DATE 
February 1976 
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Correct Operation of FORTRAN- IV 



Now find the sections <MONFSV> and <MOiMFRE> and 
record the first number to the right of the 
section name (first column of numbers). 

[MONFSV] = 



[MONFRE] = 



If the third number of the section <MONFSV> is 
000142 and the third number of the section 
<MONFRE> is 000070, then your system is configured 
for the PDP-n/i|5, PDP-11/70 hardware floating 
point unit. Note below if your system has the 
floating point unit: 



FLOATING POINT UNIT ? [Y or N] 



Bootstrap the RSTS/E system disk normally to load 

the initialization code into memory. Then use the 

PATCH option of the INIT code to install the 
following patch. 



OPTION: PATCH 

MODULE? RSTS 

BASE ADDRESS? [MON] 

OFFSET ADDRESS? 1064 

MODULE BASE OFFSET 

RSTS [MON] 001064 

RSTS [MON] 001066 



OLD NEW? 

103011 ? 101011 

162716 ? rc CONTROL/C Exit 



SOFTWARE PRODUCT 

RSTS/E EXECUTIVE 


VERSION 

V06A-02 


COMPONENT 

MONITOR PATCHES 


VERSION 

N/A 


SUBPROGRAM OR ADDITIONAL INFORMATION 


SEQUENCE 
2.3.2* 


PAGE 
3 ^' 6 


NEW REPLACEMENT ARTICLE 

CD CH 


ORIGINAL DATE 
February 1976 
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Correct Operation of FORTRRN-IV 



OPTION: PATCH 
MODULE? RSTS 
BASE ADDRESS? [MON] 
OFFSET ADDRESS? 1072 



MODULE 

RSTS 

RSTS 

RSTS 

RSTS 



BASE 

[MON] 

[MON] 

[MON] 

[MON] 



OFFSET 
001072 
001074 
001076 
001 100 



OLD NEW? 

031627 ? 004737 

177740 ? [PATCH]+74 

101424 ? 103424 

011601 ? TC CONTROL/C Exit 



OPTION: PATCH 

MODULE? RSTS 

BASE ADDRESS? [MON] 

OFFSET ADDRESS? 3604 

MODULE BASE OFFSET 

RSTS [MON] 003604 

RSTS [MON] 003606 



OLD NEW? 
140040 ? 140110 
012702 ? TC CONTROL/C 



Exit 



OPTION: PATCH 

MODULE? RSTS 

BASE ADDRESS? [MON] 

OFFSET ADDRESS? 3746 

MODULE BASE OFFSET 

RSTS [MON] 003746 

RSTS [MON] 003750 



OLD NEW? 
000040 ? 000110 
103010 ? TC CONTROL/C 



Exit 



OPTION: PATCH 

MODULE? RSTS 

BASE ADDRESS? [MON] 

OFFSET ADDRESS? 3774 

MODULE BASE OFFSET 

RSTS [MON] 003774 

RSTS [MON] 003776 



OLD NEW? 
000016 ? 000066 
012702 ? rc CONTROL/C 



Exit 



SOFTWARE PRODUCT 
RSTS/E EXECUTIVE 


VERSION 
V06A-02 


COMPONENT 

MONITOR PATCHES 


VERSION 

N/A 


SUBPROGRAM OR ADDITIONAL INFORMATION 


SEQUENCE 
2.3.2* 


PAGE 
4 0^6 


NEW REPLACEMENT ARTICLE 


ORIGINAL DATE | 


CZI EH 


Februa 


iry 1976 | 
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OPTION: PATCH 

MODULE? RSTS 

BASE ADDRESS? [MON] 

OFFSET ADDRESS? 6206 

MODULE BASE OFFSET 

RSTS [MON] 006206 



RSTS 



[MON] 



OLD 
000140 



NEW? 

? 000170 






OPTION: PATCH 
MODULE? RSTS 
BASE ADDRESS? [PATCH] 
OFFSET ADDRESS? JH 



MODULE 

RSTS 

RSTS 

RSTS 

RSTS 

RSTS 

RSTS 



BASE 

[PATCH] 

[PATCH] 

[PATCH] 

[PATCH] 

[PATCH] 

[PATCH] 



OFFSET 
000074 
000076 
000100 
000102 
000104 
000106 



OLD 

000000 

000000 

000000 

000000 

000000 

000000 



NEW? 

? 103403 

026627 

000002 

OOOJ 10 

000207 

TC CONTROL/C 



Exit 



OPTION: 



6A 



If your 
floating 



system has the 
point unit also do 



OPTION: PATCH 



PDP-n/45, PDP-n/70 
the following: 



hardware 



BASE ADDRESS? [MONFSV] 

OFFSET ADDRESS? 10 

MODULE BASE OFFSET OLD 

RSTS [MONFSV] 000010 140016 

RSTS [MONFSV] 000012 032777 



NEW? 

? 140066 

? TC CONTROL/C Exit 



SOFTWARE PRODUCT 
RSTS/E EXECUTIVE 


VERSION 
V06A-02 


COMPONENT 

MONITOR PATCHES 


VERSION 

N/A 


SUBPROGRAM OR ADDITIONAL INFORMATION 


SEQUENCE 
2.3,2* 


PAGE 
5 OF 6 


NEW REPLACEMENT ARTICLE 


ORIGINAL DATE | 


ED nz 


Februa 


ry 1976 
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OPTION: PATCH 

MODULE? RSTS 

BASE ADDRESS? [MONFSV] 

OFFSET ADDRESS? 24 

MODULE BASE OFFSET 

RSTS [MONFSV] 000024 

RSTS [MONFSV] 000026 



OLD NEW? 

000140 ? 000170 

1030)0 ? TC CONTROL/C Exit 



OPTION: PATCH 

MODULE? RSTS 

BASE ADDRESS? [MONFSV] 

OFFSET ADDRESS? 60 

MODULE BASE OFFSET 

RSTS [MONFSV] 000060 

RSTS [MONFSV] 000062 



OLD NEW? 

140060 ? 140110 

174022 ? To CONTROL/C Exit 



OPTION: PATCH 

MODULE? RSTS 

BASE ADDRESS? [MONFRE] 

OFFSET ADDRESS? 26 

MODULE BASE OFFSET 

RSTS [MONFRE] 000026 

RSTS [MONFRE] 000030 



OLD NEW? 

140J40 ? 140170 

172545 ? TC CONTROL/C Exit 



OPTION: PATCH 

MODULE? RSTS 

BASE ADDRESS? [MONFRE] 

OFFSET ADDRESS? 52 

MODULE BASE OFFSET 

RSTS [MONFRE] 000052 

RSTS [MONFRE] 000054 



OLD NEW? 

140016 ? 140066 

170145 ? TC CONTROL/C Exit 



OPTION: 



SOFTWARE PRODUCT 

RSTS/E EXECUTIVE 


VERSION 

V06A-02 


COMPONENT 

MONITOR PATCHES 


VERSION 
N/A 


SUBPROGRAM OR ADDITIONAL INFORMATION 


SEQUENCE 

2.3.2* 


PAGE 

6 OF 6 


NEW REPLACEMENT ARTICLE 


ORIGINAL DATE 

February 1976 



56 



SOFTWARE DISBMCH 



RSTS/E 



Pre-1973 



REPLACE Commands 



PROBLEM: 

Because the REPLACE command requires the allocation of user buffer 
space to execute the command, it is possible to get a MAX CORE EX- 
CEEDED indication when executing this function. 



ALTERNATE SOLUTION: 

The program code can be efficiently reorganized by doing the following i 



CLOSE 1% FOR 1% = 1% to 12% 
SAVE PROG 
OLD PROG 

Another possibility is to add a STOP as the first program statement 
and RUN the program. This forces garbage collection and frees up 
space. The STOP can then be removed and there will be suf- 
ficient buffer space to perform the REPLACE 



SOFTWARE PRODUCT 

RSTS/E Executive 








VFRSIi~-N 

V)2)6A-02 

V'L-RS(ON 


1 


COMPONENT 

1 MONITOR Notes 

1 






I" ■■ 


) 


SUBPPiOGRA.M OR AD;jiT:Oi it !. i.nIFORMAT 

MONITOR Commands 


ON 


StOL 

2. 


.:.-.■■. - i PAGE 

4.1 1 ""^ 


1 


NEW RcPLACEMCNT 

X 


ARTICLE 
1 
J 




ORIGINAL DATE 


i 
! 

t 




t 
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COMPILE Command 



PROBLEM: 



COMPILEing a program with a protection code that write-protects 
it does not work. 



SOLUTION: 

The file gets created, write-protected, and when it is to be saved 
in compiled form, the PROTECTION VIOLATION occurs. To accomplish 
what is desired, COMPILE first, then NAME-AS to change protection. 



SOFTWARE PRODUCT 
RSTS/E Executive 


VERSION 

V06A-02 


COMPONENT 
MONITOR Notes 


VERSION 


SUBPROGRAM OR ADDITIONAL INFORMATION 

MONITOR Commands 


SEOUENCt » 

2.4.2 


PAGE # 

1 OF % 


NEW REPLACEMENT ARTICLE 


ORIGINAL DATE | 


CZ! ZJ 
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RSTS/E 



January 1974 



Deletion of WRITE-PROTECTED Files 

PROBLEM: 

A file which is WRITE-PROTECTED cannot be deleted. 

SOLUTION: 

WRITE-PROTECTED specifically prevents deletion of a file by users 
against whom the protection applies. For example, a file 
WRITE-PROTECTED against the owner cannot be deleted by the owner. 
This serves to prevent accidental deletion. 

To delete such files, the protection must first be changed using 
PIP or the NAME... AS construct. Privileged users can always 
delete files regardless of the WRITE-PROTECTION. 
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SOFTWARE PRODUCT 

RSTS/E Executive 



VERSION 

V06A-02 



COMPONErjT 

MONITOR Notes 



VtRSION 



SUBPROGRAM OR ADDITIONAL INFORMATION 



NEW 



REPLACEMENT ARTICLE 



m 



bcQJENCE # 

2.4.3 



i PAGE 

' 1 3^ 



ORIGINAL DATE 

December 1973 



PROTECTION VIOLATION VJhen SAVEing Files 

PROBLEM: 

SAVE <42> results in PROTECTION VIOLATION. 

SOLUTION : 

When a program is SAVEd, the file is created {with specified protection 
code) before the text is written into the file. For this reason 
SAVE <42> first creates the file WRITE-PROTECTED against the owner; 
therefore, the text cannot be written into the file. If protection 
against the owner is desired, the file can be SAVEd with standard 
protection <60> and later changed using PIP or the "NAME. . .AS" con- 
struct. 



SOFTWARE PRODUCT 

RSTS/E Executive 


VERSION 
V06A-02 


COMPONENT 

MONITOR Notes 


VERSION 


SUBPROGRAM OR ADDITIONAL INFORMATION 
PROTECTION CODES 


SEQUENCE If 

2.4.4 


PAGE 
1 OF 1 


NEW REPLACEMENT ARTICLE 


ORIGINAL DATE i 


1 


Deceinbf 


-r 1973 ! 

i 
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SORWARE DISPATCH 



RSTS/E 



April 1975 



Protection Code of <0> Cannot Be Written 



PROBLEM: 

A file with a protection code of <0> cannot be written on by a 
nonprivileged user. 



SOLUTION: 

It is possible to delete, extend, or v/rite into an existing file 
across accoxints (even ' nonprivileged) if the protection code of 
the file permits. It is not possible, however, to create a file 
across accounts. Of course, privileged users and programs can 
perform any of the operations. 

Running without privileges, the following case is noted. The file 
NOTICE. ALL had a protection code of <0>. An unsuccessful attempt 
was made with PIP to modify the file from another account as 
shown : 

PIP NOTICE. ALL [2, 100 ]<KB: 

NOTICE. ALL [2, 100]- PROTECTION VIOLATION 

This corronand string to PIP will try to create the file NOTICE. ALL 
in account [2,100]. There is a check in the CREATE routines which 
determines if the file can be created. Since the file creation can- 
not occur, the operation fails before the current file is deleted. 
File deletion would otherwise be legal since the protection code of 
<0> permits deletion by anyone. 

If the PIP UPDATE (/UP) switch is used, the file is modified in 

place with no creation or deletion. The following example demonstrates 

this. 
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SOFTWARE PRODUCT 
RSTS/E Executive 


VERSION 
V06A-02 


COMPONENT 
MONITOR Notes 


VERSION 


SUBPROGRAM OR ADDITIONAL INFORMATION 


SEQUENCE 
2.4.5 


PAGE 
1 OF 2 


NEW REPLACEMENT ARTICLE 
X 


ORIGINAL DATE 



SOFTWARE DISPATCH 



RSTS/E 



April 1975 



Protection Code of <0> Cannot Be Written 

HELL02/'2ei3 
PR3SH0Rl> : 

RERC-V 

P IP NOTICE fi L L : ?: . i 9 9 " < K £' : 
N T ! C -Z . fl L L. '' 2 • 1 5 9 > - P ^ T ii C T I N V I L r-; T t *■ 

PIP NOTICE. ALL 

*<OTICE. ALL - CflH'T FIN;' FIlE OR fiCCOU')" 

RERDV 

PIP NOTICE. fiL.LL2. 103] 

HELLO 

HELLO 

H .E L L 

HELLO 

THIS IS Fi DUMMV PRO^PH'M 

THIS IS a DUMMV PROGRftrl 

THIS IS ft C:'UMf'1V PROQR-'^I 

R E ft L> V 

■IP NOT ICE FiLLE 2. leS Kf-S ■ /UP 

THIS IS TriE SECOND PrR" OF THE "£«:" 
HT\THSTHI5 IS THE SECONC' PART OF "-E TEX" 
THIS IS THE SECOND PfiRT OF THE TEXT 
"Z 

RERDV 

P I P NOT I VWSCE. FiLLi 2, 15i9 ] 

THIS IS THE SECOND PRRT OF THE TEXT 
THIS IS THE SECOND PftRT Or THE TEX"^ 
This IS THE SECOND PftRT OF THE TEXT 



SOFTWARE PRODUCT 
RSTS/E Executive 


VERSION 
V06A-02 


COMPONENT 
MONITOR Notes 


VERSION 


SUBPROGRAM OR ADDITIONAL INFORMATION 


SEQUENCE 
2.4.5 


7 ^''^^ 2 
2 OF ^ 


NEW REPLACEMENT ARTICLE 


ORIGINAL DATE 
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Error in 2741 Call 360 BASIC Code Conversion Table 



PROBLEM: 

The 2741 Conversion Table for Call 360 BASIC code contains two 
errors which cause incorrect ASCII conversion of the f (upper 
case P) and < (upper case 3) symbols. On input the Call 360 
terminal + is incorrectly translated to I and < is incorrectly 
translated to M. These errors are corrected by the patch 
presented below. 

SOLUTION ; 



PREREQUISITES : 

1. This patch should be installed on all Vi36A-02 systems which 
are configured for 2741 terminals with Call 360 BASIC code. 

2. Obtain a listing of the RSTS load map. This map was printed 
during System Generation, if a line printer was available at 
that time. Otherwise, the map must be printed from the LICIL 
tape created at System Generation time (DECtape or magtape 
distribution) or from the System Generation DECpack (RK dis- 
tribution) . If obtaining the map from tape media, print the 

file RSTS. MAP -Fvi-lTn -t-VlO TTPTT. +-=»-.« i.^-i .^^^ DTn ,,-J^ r>r<m<^ /-m J.I.- 

System Generation monitor, or any DOS monitor. If the media 
is DECpack, use extended PIP under RSTS/E with the /DOS switch to 
print the file RSTS. MAP from account [1,1] on the System Generation 
DECpack or bootstrap the System Generation DECpack, LOGIN under 
account [1,1], and use PIP under DOS to print the file. 

3. On the first or second page of the RSTS map under the heading 
"Program Section Allocation Synopsis," find the tag (TB2741) 
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SOFTWARE PRODUCT 

RSTS/E EXECUTIVE 


VERSION 
V06A-02 


COMPONENT 

TERMINAL SERVICE PATCHES 


VERSION 
N/A 


SUBPROGRAM OR ADDITIONAL INFORMATION 

2741 TERMINAL: CALL 360 BASIC CODE 


SEQUENCE 

2.5.1* 


PAGE 
1 OF 3 


NEW REPLACEMENT ARTICLE 


ORIGINAL DATE 
October 1975 
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December 1975 



Error in 2741 Call 360 BASIC Code Conversion Table 



and record the first number to the right of the section name 
(first column of numbers) . 

(TB2741) = 



The position of the Call 360 Conversion Table relative to 
address (TB2741) depends on the number of 2741 codes supported 
and the order in which the various codes were specified at 
System Generation time. To make the patch apply to all sys- 
tems, the four offsets 0, 400, 1000, and 1400 are tested in 
5A (which follows below) to determine the BASE ADDRESS of the Call 
360 Table. The OLD contents of the word at (TB2741)+N (where 
n=0, 400, 1000, or 1400) must be 000040 for the Call 360 Table. 

Bootstrap the RSTS/E system disk normally to load the initi- 
alization code into memory, then use the PATCH option of the 
INIT code to install the patch as shown below. If more than 
one 2741 code is supported, perform the search for the Call 
360 Table shown in 5A. If only Call 360 Basic Code is sup- 
ported on the 2741 terminals, skip the search in 5A and use 
(TB2741)+0 for the BASE ADDRESS in 5B and 5C below. 



5A. OPT I CM: PATCH 

MODULE NAME? RSTS 

BASE ADDRESS? (TB271tl) 

OFFSET ADDRESS? N 

MODULE BASE OFFSET 

RSTS (TB27ltl) N 



Where N=0, 400, 1000, or litOO 

OLD NEV^? 

OOOOltO ? C COMTROL/C EXIT 



If the OLD contents Is not equal to 000040 repeat 5A for 
the next N. If OLD=000040 use the current value for M in 5B 
and 5C below. 



SOFTWARE PRODUCT 

RSTS/E EXECUTIVE 


VERSION 

V06A-02 


COMPONENT 

TERMINAL SERVICE PATCHES 


VERSION 
N/A 


SUBPROGRAM OR ADDITIONAL INFORMATION 

2741 TERMINAL: CALL 360 BASIC CODE 


SEQUENCE 
2.5.1* 


PAGE 
2 OF 3 


NEW REPLACEMENT ARTICLE 


ORIGINAL DATE 
October 1975 
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Error in 2741 Call 360 BASIC Code Conversion Table 



5B. 


OPTION: PATCH 
MODULE NAME? RSTS 








BASE ADDRESS? (TB27m)+N 


(N from 


Part 5A above) 




OFFSET ADDRESS? 12 








MODULE BASE OFFSET 


OLD 


NEW? 




RSTS (TB2741)+N 000012 


0441*00 


?057000 




RSTS (TB27Itl)+N OOOOUt 


000000 


? C CONTROL/C 



EXIT 



5C. OPTION: PATCH 

MODULE NAME? RSTS 
BASE ADDRESS? {TB27Itl)+N 
MODULE BASE OFFSET 

RSTS (TB2741)+N 000060 
RSTS (TB27'»1)+N 000062 



(N from Part 5A above) 



OLD 

037515 

057400 



NEW? 
?037ii7lt 
? C 



CONTROL/C EXIT 



OPTION : 



SOFTWARE PRODUCT 

RSTS/E EXECUTIVE 


VERSION 

V06A-02 


COMPONENT 

TERMINAL SERVICE PATCHES 


VERSION 

N/A 


SUBPROGRAM OR ADDITIONAL INFORMATION 

2741 TERMINAL: CALL 360 BASIC CODE 


SEQUENCE 
2.5.1* 


PAGE 
3 OF 3 


NEW REPLACEMENT ARTICLE 


ORIGINAL DATE 

October 1975 
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Random Terminal Output on DHll Lines 



PROBLEM: 

When a CTKL/C or CTRL/O is typed on a terminal connected to a 
DH11 multiplexer line, random printout will occasionally occur. 
The method used to abort DH11 output allows a race condition 
which can result in transmission of a large number of 
characters from random memory locations. The problem is 
corrected by the patch presented below. 



PROCEDURE : 



This is a patch to the terminal service. It should be 
installed on all RSTS/E V6A-02 systems configured for DHll 
multiplexers , 



2. 



Obta 

duri 

Othe 

crea 
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file 
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, the 
f the 
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3. On the first page of the RSTS map under the heading 

"Program Section Allocation Sysnopsis" find the sections 

<PATCH> and <TTY>. Record the first number to the right of 
each section name (first column of numbers). 



SOFTWARE PRODUCT 

RSTS/E Executive 


VERSION 
V06A-02 


COMPONENT 
Terminal Service Patches 


VERSION 
N/A 


SUBPROGRAM OR ADDITIONAL INFORMATION 


SEQUENCE 
2.5.2* 


PAGE 
1°^^ 3 


NEW REPLACEMENT ARTICLE 

1 


ORIGINAL DATE 
December 1975 
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[PATCH] = 



[TTY] = 



The SCANER utility described in Software Dispatch Article 
No. 2. 5. 3 is used to find the patch location in the terminal 
service code, SCANER is run under normal timesharing with 
the parameters shown below. 



RUN $SCANER 



BASE ADDRESS ? [TTY] 
LIMIT ADDRESS ? <return> 



ENTER WORDS TO MATCH 



From 3 above 

Default limit is 150000 



TERMINATE WITH 'END 



OFFSET 
OFFSET 
OFFSET 
OFFSET 
OFFSET 
OFFSET 



WORD 
WORD 
WORD 
WORD 
WORD 
WORD 



000000 
000002 
000004 
000006 
000010 
000012 



CONTENTS 
CONTENTS 
CONTENTS 
CONTENTS 
CONTENTS 
CONTENTS 



5063 
10 

5063 
10 

4567 
END 



i'AlTliRN FOUND : BASE ADDRESS = [XXXXXX] 



READY 



5. Whenever convenient, take the system down and reboot the 
RSTS/E system disk normally to load the Initialization Code 
into memory. Then use the PATCH option of the INIT code to 
install the following patch. 
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SOFTWARE PRODUCT 
RSTS/E Executive 


VERSION 
V06A-02 


COMPONENT 
Terminal Service Patches 


VERSION 
N/A 


SUBPROGRAM OR ADDITIONAL INFORMATION 


SEQUENCE 
2.5.2* 


PAGE 
2 OF 3 


NEW REPLACEMENT ARTICLE 
1 1 


ORIGINAL DATE 
December 1975 
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Random Terminal Output on DHll Lines 



OPTION: PATCH 
MODULE NAME ? RSTS 
BASE ADDRESS ? [XXXXXX] 
OFFSET ADDRESS ? 
MODULE BASE OFFSET 
RSTS [XXXXXX] 000000 
RSTS [XXXXXX] 000002 
RSTS [XXXXXX] 000004 



From 4 above 



OLD 

005063 
000010 
005063 



NEW ? 

? 004737 

? [PATCH]+52 

? 7C 



Octal Addition 
CONTROL/C Exit 



OPTION: PATCH 
MODULE NAME ? RSTS 
BASE ADDRESS ? [PATCH] 
OFFSET ADDRESS ? 52 
MODULE BASE OFFSET 
RSTS [PATCH] 000052 
RSTS [PATCH] 000054 
RSTS [PATCH] 000056 
RSTS [PATCH] 000060 
RSTS [PATCH] 000062 
RSTS [PATCH] 000064 
RSTS [PATCH] 000066 
RSTS [PATCH] 000070 
RSTS [PATCH] 000072 
RSTS [PATCH] 000074 



From 3 above 



OLD 

000000 

000000 

000000 

000000 

000000 

000000 

000000 

000000 

000000 

000000 



NEW ? 

? 011346 
042716 
177760 
012704 
000001 
072426 
040463 
000012 
000207 

tc 



CONTROL/C Exit 



OPTION: 



SOFTWARE PRODUCT 
RSTS/E Executive 


VERSION 
V06A-02 


COMPONENT 
Terminal Service Patches 


VERSION 
N/A 


SUBPROGRAM OR ADDITIONAL INFORMATION 


SEQUENCE 
2,5.2* 


PAGE 
3 OF 3 


NEW REPLACEMENT ARTICLE 


ORIGINAL DATE 
December 1975 
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PROBLEM: 



For most RSTS/E system patches there is a global symbol or CSECT 
name which can serve as a base address for finding the patch 
location. All CSECT names and global symbols and their 
corresponding physical addresses can be found in the appropriate 
system load map. The location to be patched can then be 
specified as some fixed offset from this base. 

This general procedure is not always possible when trying to 
patch the Terminal Service (TTY) since this module is assembled 
during system generation and is different for each system. We 
neglected to sprinkle global symbols inside of conditional 
assembly directives to serve as convenient reference points. The 
SCANER utility listed below will be used in the future to find 
sections of code whenever the standard procedures do not suffice. 
It is used under normal timesharing to search for a sequence of 
instruction at, or near, the location to be patched. 

The program should be entered (from a privileged account), 
verified for accuracy, and compiled into the library with a 
protection code of <232>. The example which follows the program 
listing demonstrates the use of the program and serves to verify 
correct operations. 



SOLUTION : 



NEW SCANER 



READY 



10 

20 

30 

11210 

1 10 

120 

130 

200 

210 

220 

230 

240 



DIM WJ(100J) 

M1$="ILLEGAL OCTAL NUMBER" 

M2$=»ILLEGAL OCTAL ADDRESS" 

PRINT: INPUT "BASE ADDRESS ";B$: BJ=FNOJ(B$) 

IF E% THEN PRINT MU: GOTO 100 

IF 0% THEN PRINT M2$: GOTO 100 

BIJrBJ 

INPUT "LIMIT ADDRESS ";L$: L|=FNOJ(L$) 

IF E$ THEN PRINT M1$: GOTO 200 

IF 0% THEN PRINT M2$: GOTO 200 

IF L$ = 0J THEN L!t = FNOS(("l60000") 

L=(LJ AND 32767?) : IF L%<a% THEN L=L+32768. 



SOFTWARE PRODUCT 
RSTS/E Executive 


VERSION 
V6A-02 


COMPONENT 
Terminal Service Patches 


VERSION 

N/A 


SUBPROGRAM OR ADDITIONAL INFORMATION 
SCANER 


SEQUENCE 
2.5.3* 


PAGE 
1 OF 3 


NEW REPLACEMENT ARTICLE 


ORIGINAL DATE 
December 1975 
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300 

310 

320 

330 

340 

350 

400 

410 

420 

430 

440 

450 

500 

510 

4000 

4010 

4020 

4030 

4040 

4050 
4060 
4070 
4080 
4090 
4 100 
4 1 10 
5000 
5010 
5020 



5030 
9000 
9010 
9020 
9999 



PRINT: PRINT "ENTER WORDS TO MATCH - TERMINATE WITH END " : 
PRINT 

FOR I$=0J TO 66$ STEP 2J 

PRINT "OFFSET WORD ";FNO$(I?);" CONTENTS ";: INPUT W$ 
IF CVT$$(W$,-1 J) = "END" THEN 400 ELSE W J ( I J ) = FNO$ ( W$ ) 
IF EJ THEN PRINT M1$: GOTO 320 

NEXT 1%: PRINT "TOO MANY WORDS TO MATCH - TRY AGAIN": GOTO 300 
N$:I?-2J: ON ERROR GOTO 9000 
FOR IJ=0J TO NJ STEP 2% 

M? = BJ + I?: H=(.m AND 32767$) : IF H?<0J THEN M = M + 32768, 
IF M>L THEN 9010 

IF WJ(XJ)<>PEEK(M$) THEN B?=Bj+2$: GOTO 410 
NEXT li 

PRINT: PRINT "PATTERN FOUND : BASE ADDRESS z ";FN0$(BJ) 
GOTO 9999 

DEF FNO!l(X$) ! CONVERT "STRING OCTAL" TO DECIMAL 
X?,E$,O?=0J : X$=CVT$$(X$,173*) : IF X$="" THEN 4110 
X1J=LEN(X$) : IF X1i>6$ THEN 4100 
IF X1$<6J THEN 4060 
IF LEFT(X$, 1 J)="0" THEN 4050 ELSE 
IF LEFT(X$,1$)<>"1" THEN 4100 ELSE XJ=32767$+1J 
X$=RIGHT(X$,2?) : X1$=5$ 
FOR X9i=1J TO XIJ 

X2? = ASCII(MID(X$,X1it+n-X9J, 1 ?)) -ASCII ( "0" ) 
IF X2? AND -8? THEN 4100 ELSE X$:X J + X2it« ( 8 J »» ( X9t- 1 J ) ) 
NEXT X9J: GOTO 4110 
E%= 1 % 

FNO%=X? : 0%=X% AND 1$ : FNEND 

DEF FNO$(X$) ! CONVERT DECIMAL TO "STRING OCTAL" 
X$="0" : IF XJ<0!t THEN X$ = "1" : X% = \% AND 32767* 
X$ = X$ + CHR$(((X? AND 28672$ ) /409 6? ) +48$ ) 
+ CHR$(((X$ AND 3584$)/ 512$)+48$) 
448$)/ 64$)+48$) 
56$)/ 



CHR$(((X$ AND 
CHR$(((X$ AND 
CHR$(( X$ AND 
FNEND 



7$) 



8$)+48$) 
+ 48$) 



FNO$=X$ 

RESUME 9010 

PRINT 

PRINT "PATTERN NOT FOUND IN RANGE " ; FNO$ ( B 1 $ ) ; " TO ";FNO$(L$) 

END 



COMPILE $ 

READY 

NAME "$SCANER.BAC" AS "$SCANER . BAC<232>" 

READY 



SOFTWARE PRODUCT 
RSTS/E Executive 



COMPONENT 
Terminal Service Patches 



SUBPROGRAM OR ADDITIONAL INFORMATION 

SCANER 



N EW 
X 



REPLACEMENT ARTICLE 



VERSION 
V06A-02 



VERSION 
N/A 



SEQUENCE 
2.5.3* 



PAGE 
2 O"^ 3 



ORIGINAL DATE 
December 1975 
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To verify correct operation, locate a copy of the RSTS load 
map for your installation. On the first or second page of 
the map under the heading "Program Section Allocation 
Synopsis" find the section names <MON> and <FIP> and record 
the first number to the right of the section names. 

[MON] = 



[FIP] = 



Run the scanner with the input parameters shown, 
will work for V06A-02 and V05C-01. 



The numbers 



RUN $SCANER 



BASE ADDRESS ? [MON] 
LIMIT ADDRESS ? <return> 



From 1 above 

Default limit is 160000 



ENTER WORDS TO MATCH - TERMINATE WITH 'END' 



OFFSET 


WORD 


000000 


CONTENTS 


9 


1001 


OFFSET 


WORD 


000002 


CONTENTS 


•> 


400i| 


OFFSET 


WORD 


000004 


CONTENTS 


? 


20020 


OFFSET 


WORD 


000006 


CONTENTS 


7 


100100 


OFFSET 


WORD 


000000 


CONTENTS 


9 


END 



PATTERN FOUND : BASE ADDRESS = XXXXXX r [FIP] 



READY 

If the program has been entered correctly, the value XXXXXX 
printed by SCANER will equal the address shown for [FIP] in 
the load map. 



SOFTWARE PRODUCT 
RSTS/E Executive 


VERSION 
V06A-02 


COMPONENT 
Terminal Service Patches 


VERSION 
N/A 


SUBPROGRAM OR ADDITIONAL INFORMATION 
SCANER 


SEQUENCE 
2.5.3* 


PAGE 
3 °^3 


NEW REPLACEMENT ARTICLE 


ORIGINAL DATE 
December 1975 
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This problem does not disrupt system operation in any way but may 
confuse some one trying to interpret the error log report. The 
patch described below is not perfect. The probability of an 
incorrect hung teletype error log is reduced to an infinitesimal 
probability. 



PRODEDURE 



2. 



This is a patch to the terminal service, 
installed on all RSTS/E V06A-02 systems. 



It should be 



Obtain a listing of the RSTS load map. This map was printed 
during system generation if a line printer was available at 
that time. Otherwise, the map must be printed from the LICIL 
tape created at System Generation time (DECtape, or magtape 
distribution) or from the System Generation DECpack (RK 
distribution). If obtaining the map from tape media, print 
the file RSTS. HAP from the LICIL tape using PIP under RSTS/E, 



SOFTWARE PRODUCT 

RSTS/E Executive 


VERSION 

V06A-02 


COMPONENT 

Terminal Service Patches 


VERSION 
N/A 


SUBPROGRAM OR ADDITIONAL INFORMATION 


SEQUENCE 
2.5.4* 


PAGE 

OF 

1 3 


NEW REPLACEMENT ARTICLE 

q: ch 


ORIGINAL DATE 
January 1976 
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the System Generation monitor, or any DOS monitor. If the 
media is DECpack, use extended PIP under RSTS/E with the /DOS 
switch to print the file RSTS.MAP from account [1,1] on the 
System Generation DECpack or bootstrap the System Generation 
DECpack, LOGIN under account [1,1], and use PIP under DOS to 
print the file. 



3. On the first or second page of the RSTS map under the heading 

"Program Section Allocation Synopsis" find the section MON 

and record the first number to the right of the section name 
(first column of numbers). 

[MON] = 



On about the 6th page of the RSTS load map, find the heading 
•!•«« TITLE TTY IDENT:06a.02 FILE TTY.OBJ". Scan down the 
left column for the section name TTY and locate the tag 
TTYHNG in the listing of global symbols. Record the number 
which appears immediately to the right of the tag TTYHNG. 

[TTYHNG] = 



This patch is one of those cases where we have to rely on a 
BASIC-PLUS program and some magic to find the location to 
patch. The program SCANER listed in Article #2.5.3 is used 
below to find the correct base address. SCANER is run under 
normal timesharing. 



RUN $SCANER 

BASE ADDRESS? [TTYHNG] From 4 above 
LIMIT ADDRESS? [MON] From 3 above 

ENTER WORDS TO MATCH - TERMINATE WITH 'END' 



OFFSET 


WORD 


000000 


CONTENTS 


9 


UOf 


OFFSET 


WORD 


000002 


CONTENTS 


7 


162704 


OFFSET 


WORD 


000004 


CONTENTS 


9 


200 


OFFSET 


WORD 


000006 


CONTENTS 


7 


10041 1 


OFFSET 


WORD 


000010 


CONTENTS 


7 


1413 


OFFSET 


WORD 


000012 


CONTENTS 


7 


104207 


OFFSET 


WORD 


000011* 


CONTENTS 


7 


END 



PATTERN FOUND : BASE ADDRESS = [XXXXXX] used below 
READY 
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Whenever convenient, take the system down and then bootstrap 
the RSTS/E system disk normally to load the Initialization 
Code into memory. Then use the patch option of the INIT code 
to install the patch as shown below. 



OPTION: PATCH 

MODULE NAME? RSTS 

BASE ADDRESS? [XXXXXX] From 5 above 

OFFSET ADDRESS? 

MODULE BASE 

RSTS [XXXXXX] 

HSTS [XXXXXX] 

RSTS [XXXXXX] 

RSTS [XXXXXX] 

RSTS [XXXXXX] 

RSTS [XXXXXX] 000012 104207 ? TC CONTROL/C Exit 



OPTION; 



OFFSET 


OLD 


NEW? 


000000 


00140M 


9 


106304 


000002 


152704 


•J 


100413 


000004 


000200 


9 


103415 


000006 


10041 1 


9 


000240 


000010 


001413 


9 


000240 


000012 


104207 


9 


TC CONTROL/C 
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PROCEDURE : 



1. 



This Is 
should 



a patch to the terminal service. It 
be installed on all RSTS/E \/GA-02 systems. 



Obtains listing of the RSTS load map. This map 
Is printed during systein generation If a line 
printer Is available. Otherwise the map must be 
printed from the LICIL tape created during SYSGEN 
(DECtape or magtape distribution) or from the 
System Generation DECpack (RK distribution). If 
the distribution medium is DECtape or magtape, 
print the file RSTS. MAP from the LICIL tape using 
PIP under RSTS, the system generation monitor, or 



SOFTWARE PRODUCT 
RSTS/E EXECUTIVE 


VERSION 

V06A-02 


COMPONENT 

Terminal Service Patches 


VERSION 

N/A 


SUBPROGRAM OR ADDITIONAL INFORMATION 


SEQUENCE 
2.5.5* 


PAGE 
1OF3 


NEW REPLACEMENT ARTICLE 

m 1^ 


ORIGINAL DATE 
January 1976 
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any DOS monitor. If the distribution media is 
DECpack, use PIP with the DOS switch under RSTS/E 
to print the file RSTS.MAP from account (1/1) on 
the System Generation DECpack or bootstrap the 
System Generation DECpack, LOGIN under account 
(1,1)/ and use PIP under DOS to print the file. 



3. 



On the first page of the RSTS map under the 
heading "Program Section Allocation Synopsis" find 
the section <PATCH>. Record the first number to 
the right of each section name (first column of 
numbers) . 

(PATCH) = 



On about the sixth page of the RSTS load map, find 
the heading "***TITLE TTY IDENT:UbA-02 FILE 
TTY.OBJ". Scan down the left column for the 
section name <TTY> and locate the tag TTICR9 in 
the listing of global symbols. Record the number 
which appears Immediately to the right of the tag 
TTICR9. 

(TTICR9) = 



Bootstrap the RSTS/E system disk normally to load 
the Initialization Code Into memory. Then use the 
patch option of the INIT code to install the patch 
as shown below. 



OPTION: PATCH 

MODULE NAME ? RSTS 

BASE ADDRESS ? (TTICR9) 

OFFSET ADDRESS ? 177700 

MODULE BASE OFFSET OLD 

RSTS (TTICR9) 177700 llblGl 

RSTS (TTICR9) 177702 000031* 

RSTS (TTICR9) 177704 OOOOOG 

RSTS (TTICR9) 177700 032711 



NEW ? 
? 004737 
? (PATCH)+34 
? 000240 

? tc 

CONTROL/C 
Exit 
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OPTION: PATCH 
MODULE NAME ? 
BASE ADDRESS ? 
OFFSET ADDRESS 



MODULE 

RSTS 

RSTS 

RSTS 

RSTS 

RSTS 

RSTS 

RSTS 

RSTS 



BASE 

(PATCH) 

(PATCH) 

(PATCH) 

(PATCH) 

(PATCH) 

(PATCH) 

(PATCH) 

(PATCH) 



RSTS 

(PATCH) 

? 31+ 

OFFSET 
000031* 
000036 
00001*0 
00001*2 
00001*1* 
00001*6 
000050 
000052 



OLD 

000000 

000000 

000000 

000000 

000000 

000000 

000000 

000000 



NEW? 
? 032711 
01*1*000 
0011*03 
116161 
000031* 
000006 
000207 

tc 

CONTROL/ C 
Exit 



? 

? 
? 

? 



OPTION: 
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Due to an error in the terminal service, RSTS/E V6A-02 
will not come up for timesharing if any lines on a 
DHll are disabled with the SETKEY option of the 
Initialization Code. The system will come up normally 
if ALL lines on the DHll are disabled. The error is 
corrected with the following patch. 



PROCEDURE 
1 , 



2. 



This is a patch to the DHll code in the terminal 
service. It should be installed on all RSTS/E 
V06A-02 systems which are configured 
more DHll multiplexers. 



for one or 



Obtain a listing of the RSTS load map. This map 
was printed during System Generation if a line 
printer was available at that time. Otherwise, 
the map must be printed from the LICIL tape 
created at System Generation time (DECtape or 
magtape distribution) or from the System 
Generation DECpack (RK distribution). If 
obtaining the map from tape media, print the file 
RSTS. MAP from the LICIL tape using PIP under RSTS, 
the System Generation monitor, or any DOS monitor. 
If the media is DECpack, use PIP with the /DOS 
switch under RSTS/E to print the file RSTS. MAP 
from account [1,11 on the System Generation 
DECpack. Alternatively, bootstrap the System 
Generation DECpack, LOGIN under account [1,1], and 
use PIP under DOS to print the file. 



SOFTWARE PRODUCT 

RSTS/E EXECUTIVE 


VERSION 
V06A-02 


COMPONENT 

TERMINAL SERVICE PATCHES 


VERSION 
N/A 


SUBPROGRAM OR ADDITIONAL INFORMATION 


SEQUENCE 
2.5.6* 


PAGE 
lOF 3 


NEW REPLACEMENT ARTICLE 

=1 


ORIGINAL DATE 
February 1976 
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3. On the first page of the RSTS map under the 
heading "Program Section Allocation Synopsis" find 
the tag <PATCH> and record the first number to the 
right of the section name (first column of 
numbers) . 

[PATCH] = 



On about the sixth page of the RSTS load map, find 
the heading "»»»TITLE TTY IDENT:06A.02 FILE 
TTY.OBJ". Scan down the left column for the 
section name <TTy> and locate the tag TTYHNG in 
the listing of global symbols. Record the number 
which appears immediately to the right of the 
TTYHNG. 



tag 



[TTYHNG] = 



5. Bootstrap the RSTS/E system disk normally to load 
the Initialization Code into memory. Then use the 
patch option of the INIT code to install the patch 
as shown below. 



OPTION: PATCH 
MODULE NAME? RSTS 
BASE ADDRESS? [TTYHNG] 
OFFSET ADDRESS? 177712 
MODULE BASE OFFSET 
RSTS [TTYHNG] 177712 



OLD NEW? 
[XXX] ?tc CTRL/C 
Exit 



SOFTWARE PRODUCT 

RSTS/E EXECUTIVE 


VERSION 
V06A-02 


COMPONENT 

TERMINAL SERVICE PATCHES 


VERSION 

N/A 


SUBPROGRAM OR ADDITIONAL INFORMATION 


SEQUENCE 
2.5.6* 


PAGE 
2 OF 3 


NEW REPLACEMENT ARTICLE 


ORIGINAL DATE 
Febryary 1976 
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OPTION: PATCH 
MODULE NAME ? RSTS 
BASE ADDRESS ? [TTYHNG] 
OFFSET ADDRESS ? [XXX]+242 
MODULE BASE OFFSET 
RSTS [TTYHNG] [XXX]+242 
RSTS [TTYHNG] [XXX]+244 

RSTS [TTYHNG] [XXX]+246 



RSTS [TTYHNG] [XXX]+250 



Octal Addition 
OLD NEW? 
032760 7004537 
001000 ?[PATCH]+12 

Octal Addition 
[YYY] 7000765 

[YYY] is used 
below 
OOHIO 7tC CTRL/C Exit 



OPTION: 

MODULE 

BASE AD 

OFFSET 

MODULE 

RSTS 

RSTS 

RSTS 

RSTS 

RSTS 

RSTS 

RSTS 

RSTS 

RSTS 

RSTS 



PATCH 
NAME 7 RS 
DRESS 7 [ 
ADDRESS 7 
BASE 
[PATCH] 
[PATCH] 
[PATCH] 
[PATCH] 
[PATCH] 
[PATCH] 
[PATCH] 
[PATCH] 
[PATCH] 
[PATCH] 



TS 

PATCH] 
12 

OFFSET 
000012 
000014 
000016 
000020 
000022 
000024 
000026 
000030 
000032 
000034 



OLD NEW 7 

000000 7132761 

000000 7000001 

000000 7000002 

000000 7001004 

000000 7005725 

000000 7032760 

000000 7001000 

000000 7[YYY] From above 

000000 7000205 

000000 7tC CTRL/C Exit 



OPTION: 



SOFTWARE PRODUCT 

RSTS/E EXECUTIVE 


VERSION 
V06A-02 


COMPONENT 

TERMINAL SERVICE PATCHES 


VERSION 

N/A 


SUBPROGRAM OR ADDITIONAL INFORMATION 


SEQUENCE 
2.5.6* 


PAGE 
3 OP3 


NEW REPLACEMENT ARTICLE 

[xZ CD 


ORIGINAL DATE 

February 1976 
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2741 TERMINAL INTERFACE WIRING 

The DLll (D's and E's) terminal line interfaces require a special 
configuration for supporting the 2741. The configuration requires 
6 data bits, 1 start bit, 1 stop bit, odd parity, 134.5 baud, and 
rotary switch position 3 for both, input and output (full counter- 
clockwise is position 1). The following jumpers apply to each 
condition: 



CONDITION 
6 DATA BITS 

1 STOP 



JUMPER 



NBl 


OUT 


NB2 


IN 


2SB 


IN 


J9 


OUT 


JIO 


IN 


Jll 


OUT 


NP 


IN 


EPS 


IN 



ODD PARITY 



The 134.5 baud specification requires a 1.03296M crystal (DEC part 
#18-05502-6). 

Refer to the DLll Installation Procedure for specifications pertinent 
to the DLllD and DLllE. 



81 



SOFTWARE PRODUCT 

RSTS/E Executive 


VERSION 

V06A-0 2 


COMPONENT 

Terminal Service Notes 


VERSION 
N/A 


SUBPROGRAM OR ADDITIONAL INFORMATION 

Additional 2741 Hardware Info. 


SEQUENCE 

2.6.1 


PAGE 
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NEW REPLACEMENT ARTICLE 


ORIGINAL DATE 



SOFTWARE DISBMCH 



RSTS/E 



August 1975 



2741 Hardware Options Required by RSTS/E 

RSTS/E supports 2741-coitpatible terminals connected through DLllD, 
DLllE, and DCll single- line interfaces or DHll multiplexers. Certain 
2741 hardware options are required for proper operation under RSTS/E. 

The ability to detect "reverse breaks" is an option on 2741 terminals 
supplied by some manufacturers including IBM. A reverse break is a 
control sequence sent by the computer to a terminal which is currently 
transmitting (keyboard is unlocked) . The purpose of the reverse 
break is to force the terminal into receive state (keyboard locked) . 
RSTS/E sends a reverse break any time the system has output for the 
2741 terminal but internal status tables indicate that the terminal 
is in transmit state. If the terminal does not recognize the reverse 
break sequence, lock the keyboard, and switch to receive state, the 
output will be lost and the terminal can end up in a strange state. 

IBM refers to the reverse break detection capability on the IBM 2741 
Model 1 Communication Terminal as Feature #4708 - Receive Interrupt. 
This option must be installed on all IBM 2741 terminals for correct 
operation under RSTS/E. 

The ATTENTION key is also optional on IBM 2741 terminals and is 
required for operation under RSTS/E. The ATTN key generates a break 
which is interpreted in several ways by RSTS/E software. Section 5.8.1 
of the RSTS-11 System User's Guide (DEC-11-ORSUA-D-D) describes the 
various functions of the ATTN key. IBM refers to the ATTN key and 
the associated break generation hardware as Feature #7900 - Transmit 
Interrupt. This option is commonly included on 2741 terminals 
supplied by IBM and is a standard feature on many terminals supplied 
by other manufacturers. 
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Note on Lower and Upper Case Characters 



RSTS/E can always handle upper case characters in either input or 
output . 

RSTS/E V06A-02 can receive lower case characters from any terminal capable 
of sending them. It will automatically convert all received lower case 
characters into upper case unless preservation of lower case is enabled 
through $TTYSET. 

It can output any kind of character to a terminal. Not all terminals, 
however, are capable of printing lower case. If lower case is sent to 
an uppercase only DIGITAL terminal, for example, it will print it as 
upper case. $TTYSET can also be used to cause RSTS/E to convert lower 
case characters to upper case before being transmitted to the terminal. 

For line printers capable of printing lower case, RSTS/E can be configured 
with the ability to send lower case characters to the line printer (s). 
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Noisy Telephone Lines 



PROBLEM: 



A user connected to RSTS by a telephone line gets detached and has 
to call back in and re-attach. Some of his output is lost. 



DISCUSSION: 

After carrier is lost on a dial-up line (usually caused by noise 
in the telephone system) , RSTS allows five seconds for carrier to 
return and then detaches the job. During those two seconds 100 
characters may be sent to a 110 BAUD line and may be lost, or as 
many as 150 characters may be lost on a 300 baud line. 

The solution to this problem is costly in core. We do not feel the cost 
is justified, since it seldom causes any real difficulty to remote users. 
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Hung Teletype Errors on DCll Lines 



PROBLEM: 



Hung teletype errors will sometimes be logged on DCll lines when 
the receiver at the remote end is hung up. On some modems, the 
Clear to Send lead follows carrier and, therefore, drops when 
carrier drops (the phone is hung up) . Clear to Send low inhibits 
transmitter interrupts on the DCll interface. RSTS/E will log 
an error if the terminal service sees both INTERRUPT ENABLE and 
READY set in the output status register of the DCll. Normally, 
the device should interrupt under these conditions. The terminal 
service does not check to see if the interrupt was inhibited by 
Clear to Send being low. 

This condition arises if the receiver is being hung up with trans- 
missions pending. A similar situation arises if noise is induced 
on the line by the disconnect. The noise is interpreted as a 
character which the system tries to echo. From one to five errors 
(one per second) will be logged during the 5 second disconnect 
timeout . 

Clear to Send low does not inhibit transmitter interrupts on other 
types of terminal interfaces so the problem does not appear. 



SOLUTION : 

An option available on most Bell Data Sets will eliminate this 
problem on the DCll. The options required for the various types 
of data sets are listed below. Consult the phone company or modem 
manufacturer for installation of the options. 
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Hung Teletype Errors on DCll Lines 



BELL DATA SET 



103A3,103E,103G,103H 



113B 



OPTION REQUIRED FOR CORRECT 
OPERATION OF DCll INTERFACES 

The "CB-CF Indicate Separate " 
option should be installed. 

"The COMMON CB and CF option" 
should not be installed. 
Dataset leads CB (Clear to 
Send) and CF (Carrier) should 
present discrete signals to 
the terminal interface. 



103A,103A2,103F 



CB and CF circuits present 
identical signals. COMMON or 
SEPARATE options are apparently 
not available. These data 
sets should not be used with 
the DCll interface. 



If it is inconvenient to change data sets or install the required 
option, the Hung TTY errors can be ignored. They do not affect 
system operation in any way. 
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Understanding Synchronization Delays 



digital's new video terminals (VT50, VT52, etc.) use 
two special control characters (XOFF and XON) to 
request the host computer to suspend and resume data 
transmission. One use of this synchronization 
protocol allows the terminal to "freeze" a screen of 
data giving the user a chance to read It before It has 
scrolled off the screen. This special mode^ called 
HOLD SCREEN MODE, Is enabled and disabled with escape 
sequences. Once enabled, the terminal detects when a 
line Is about to be scrolled from the screen. The 
character received from the host computer that would 
cause the scroll Is line feed (LF). At this point the 
terminal sends an XOFF to the host computer and awaits 
the user typing the SCROLL key. During this time the 
terminal will accept and buffer In a temporary storage 
area further characters received from the host 
computer. Even with the assumption that the host 
computer can cease transmission without any software 
delays, there are delays In line transmission that 
cause a determinable number of characters to be 
received by the terminal after It has sent the XOFF. 
HOLD SCREEN MODE Is just one use of this 
synchronization protocol. Another use occurs In the 
handling of the hard copy option of the VT50 series 
terminals. The copier Is slow (at least compared to 
the video screen) and the terminal must request host 
computer transmission suspension to avoid missing data 
when the copter Is running. 
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Understanding Synchronization Delays page 2 of 3 



Below Is the formula used for calculating the worst 
case number of characters that would be received after 
the terminal has sent the XOFF. 

1 + ( 3*Y/X ) + 2*D*Y 

In this formula, X Is the terminal's transmission rate 
In characters per second (CPS), Y is the host 
computer's transmission rate In CPS, and D Is the 
delay time In seconds for a character to travel from 
one end of the line to the other end. 

Considering the formula from left to right: 

The 1 Is the character storage requirement for the 
line feed that triggered the XOFF In the first place. 

The 3*Y/X Is due to the nature of the UART (Universal 
Asynchronous Receiver/Transmitter) in the terminal. 
Since the UART Is double buffered, there can be two 
characters already In the UART's buffers when the 
terminal desires to send the XOFF. Those two 
characters plus the XOFF correspond to three character 
times of terminal to computer transmit during which 
time the computer may be sending to the terminal. 
Therefore, It Is the ratio of the computer and 
terminal transmission rates that Is important for 
three terminal transmission times. 

The 2*D Is the total time delay for the line in both 
directions (the 2) to clear. During this time the 
host computer may have sent 2*D*Y characters to the 
terminal . 

The formula presented here Is not completely correct 
for the VT50 series of video terminals. The VT50 
series does not double buffer transmission to the host 
computer In Its UART. On the other hand, the formula 
can be used as a worst case formula to ensure correct 
operation of the XON/XOFF Synchronization Protocol. 

The VT50 series of video terminals have a temporary 
storage area capable of holding up to fourteen 
characters Including the LF that triggered the XOFF. 
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Understanding Synchronization Delays page 3 of 3 



The following tables give the required size of a 
temporary storage area given: 1) the transmission 
speed (baud rate) from the computer to the terminal/ 
2) the transmission speed from the terminal to the 
computer, and 3) the physical delay of the 
transmission line. Local terminal connections have 
essentially a zero delay factor. The Telephone 
Company specifies a nominal worst case delay of 50ms 
In a coast to coast connection, assuming It is not via 
satellite. The horizontal scale of baud rates Is the 
baud rate from the computer to the terminal. 

The vertical scale of baud rates Is the baud rate 
scale from the terminal to the computer. Baud rates 
can be converted to characters per second (CPS) by 
dividing the baud rate by 10 (1 start bit + 8 data 
bits + 1 stop bit = 10 bits) with the exception of 110 
baud which corresponds to 10 CPS (1 start bit + 8 data 
bi ts + 2 stop bits) . 
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Terminal Fill Characters 



A table on page 4-46 of the RSTS-11 System User's Guide 
(DEC-11-ORSUA-D-D) lists the number of fill (NUL) charac- 
ters sent for various control characters (CR,LF,HT,VT, and 
FF) , The table is not quite correct and does not show all 
relevant information. The table below lists the actual 
number of fill characters sent after the various control 
characters for RSTS/E V06A-02. 



CTRL 

CHAR 


DEC 

VAL 


CHARACTERISTICS 1 


SCOPE 


NO SCOPE 1 


FORM 


NO FORM 


TAB 


NO TAB 


OR 


13 





lx2^ili-l 




N/A 


N/A 


N/A 


:N/A 


LF 


10 


lx2Fill-l 







N/A 


N/A 


N/A 


N/A 


HT(tab) 


9 


N/A 


N/A 




N/A 


N/A 


1x5^^1-1 


SPACES 
ARE 

SENT 


VT(Vert. 
tab) 


11 


lx2^ill-^ 


SEE FORM 
/NO FORM 




5x2^^11-1 


Do 4 
LFs 


N/A 


N/A 


FF 


12 


«/A 


N/A 




9x2^^11-1 


Do 4 
LFs 


N/A 


N/A 



Fill is a special case which results in no fill characters 
being sent for any of the control characters. The expressions 
above do not apply for Fill 0. 
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KEYBOARD ASSIGNMENTS - OPTIONAL FILE PROCESSOR PATCH 
PROBLEM: 

RSTS/E systems normally permit any user to ASSIGN or OPEN 
any free keyboard for I/O operations. It Is sometimes very 
convenient to use a second terminal for special output or even to 
Interact with more than one terminal. The RSTS/E Implementation 
of multi-terminal service requires that all slave terminals be 
ASSIGNed but not OPENed before a program can perform I/O to a 
terminal In the multi-terminal set. 

In potentially hostile environments such as educational 
Installations/ the assignment of keyboards by non-prlvl leged 
users may compromise system Integrity. Any user could assign a 
number of terminals and emulate the entire LOGIN dialogue with a 
fairly simple multi-terminal program. The program could be used 
to obtain passwords for accounts which would allow unrestricted 
access to those accounts. The person trying to log In would be 
unaware that his terminal was under control of a fellow student 
and would probably just try again when his first login attempt 
was unsuccessful. 

SOLUTION; 



The patch below makes the assignment of keyboards a 
privileged operation. In particular, multi-terminal service Is 
restricted to privileged programs or programs running under 
privileged accounts. With the patch Installed, a non-prlvl leged 
user may ASSIGN and/or OPEN only his own keyboard (I.e. OPEN 

Hl^D.II AC CIIC U I- -kill 1^.. l\ n_t t. i _ 

r.w . r%w rii.1. II la aciii per Mil l Ltsuy . rr I V I I egea users or 
programs may still ASSIGN and/or OPEN any available keyboard. 



The system manager may choose to create a privileged program 
to allow selected non-privileged users to assign keyboards. The 
selection criterion could be based on PPN, a special password, or 
any other appropriate protection mechanism. The program would 
use the "ASSIGN A DEVICE" SYS call to perform the actual keyboard 
assignment. Non-prlvl leged users who are allowed to use extra 
keyboards would simply run this library program, assign the 
necessary devices, and exit from the program. Once he exited 
from the privileged program, the user would again be running 
non-privileged and could make no further keyboard assignments. 
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PROCEDURE: 



1. 



3. 



Installed on any RSTS/E 



This patch Is optional but may be 
V06A-02 system. 

Obtain a listing of the RSTS load map. This map Is printed 
during system generation If a line printer Is available. 
Otherwise the map must be printed from the LICIL tape created 
during SYSGEN (DECtape or magtape distribution) or from the 
System Generation DECpack (RK distribution). If the 
distribution medium Is DECtape or magtape, print the file 
RSTS. MAP from the LICIL tape using PIP under RSTS, the system 
generation monitor, or any DOS monitor. If the distribution 
medium Is RK disk cartridge, use Extended PIP under RSTS with 
the /DOS switch to print the file RSTS. MAP from account [1,1] 
on the System Generation DECpack used for your system 
generation. Alternatively, bootstrap the System Generation 
DECpack, log Into the DOS/BATCH monitor with the LO 1,1 
command, and use PIP under DOS to print the map file. 

On the first page of the RSTS map under the heading "Program 
Section Allocation Sysnopsis" find the section <FIP>. Record 
the first number to the right of the section name (first 
column of numbers). 



[FIP] 



k. 



Bootstrap the RSTS/E system disk normally to load the 
Initialization Code Into memory. Then use the PATCH option 
of the INIT code to Install the patch as shown below. 



OPTION: PATCH 
MODULE NAME ? 
BASE ADDRESS ? 
OFFSET ADDRESS 
MODULE BASE 
RSTS [FIP] 
RSTS [FIP] 



RSTS 

[FIP] 

? 772 
OFFSET 
000772 
00077U 



OLD 
177777 
001003 



NEW? 

? 000002 

? +C 



CONTROL/C EXIT 



OPTION: 
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MAGTAPE DENSITY/ PARITY DEFAULTS - OPTIONAL FILE PROCESSOR PATCH 



The default density 
magtape operations unde 
parity. In previous vers 
could be changed with th 
structured magtape proces 
extended In V06A-02 to 
both non-file structured 

Furthermore, the sys 
parity can be changed 
facility will be usefu 
Interchanged with other 
ODD parity convention. 



and parity settings for TU16 and TUlO 
r RSTS/E V06A-02 are 800 BPI and ODD 
Ions of RSTS/E, these default settings 
e MAGTAPE function but only for non-file 
sing. The MAGTAPE function has been 
allow density and parity to be set for 
and file structured operations. 

tern default settings for density and 

by the patch presented below. This 

1 If magtapes are to be frequently 

systems which do not use the 800 BPI and 



NOTE: All RSTS/E V06A-02 distribution magtapes (Including the 

COBOL/SORT magtape) are written at 800 BPI with ODD 

parity. This patch should not be Installed until after 

the system library build procedures (Including 
COBOL/SORT) are completed. 

PROCEDURE: 

1. This patch Is optional but may be Installed on any RSTS/E 

V06A-02 system which Is configured for TU16 or TUlO magtape 
drives. 



Obtain a listing of the RSTS load map. This map 

Hlirtnv cx/ct'om tronorat \ nn If a 1 t no nrlnt-ai* l< 



Is printed 

Otherwise the map must be printed from the LICIL tape created 
during SYSGEN (DECtape or magtape distribution) or from the 
System Generation DECpack (RK distribution). If the 
distribution medium Is DECtape or magtape, print the file 
RSTS. MAP from the LICIL tape using PIP under RSTS, the system 
generation monitor, or any DOS monitor. If the distribution 
medium Is RK disk cartridge, use extended PIP under RSTS with 
the /DOS switch to print the file RSTS. MAP from account II, IJ 
on the System Generation DECpack used for your system 
generation. Alternatively, bootstrap the System Generation 
DECpack, log Into the DOS/BATCH monitor with the LO 1,1 
command, and use PIP under DOS to print the map file. 
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On the first page of the RSTS map under the heading "Program 
Section Allocation SysnopsIs" find the section <FIP>. Record 
the first number to the right of the section name (first 
column of numbers). 

[FIP] - 



Select the desired magtape density and parity from the table 
below. The appropriate value from the [XXXXXX] column Is 
used In the patch to set the system default density and 
parity. 

IXXXXXX] 



TUlO 
9-TRACK 


TUlO 
7-TRACK 


TU16 
9-TRACK 


800 BPI 
ODD PARITY 


800 BPI 
ODD PARITY 
DUMP MODE 


800 BPI 
ODD PARITY 


800 BPI 
EVEN PARITY 


800 BPI 
EVEN PARITY 
DUMP MODE 


800 BPI 
EVEN PARITY 


ILLEGAL 


ILLEGAL 


1600 BPI 
PHASE ENCODED 



060000 



064000 



000000 



Normal 
Default 



Bootstrap the RSTS/E system disk normally to load the 
Initialization Code Into memory. Then use the PATCH option 
of the INIT code to Install the patch as shown below. 



OPTION: PATCH 
MODULE NAME ? RSTS 
BASE ADDRESS ? [FIPl 
OFFSET ADDRESS ? lOkk 
MODULE BASE OFFSET 
RSTS [FIP] 001044 
RSTS [FIP] 001046 


OLD 
060000 
116761 


NEW? 

? [XXXXXX] From 4 Above 

? iC CONTROL/C Exit 


OPTION: 
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Problem with File Deletion Function 



PROBLEM: 

The file deletion function does not zero the disk blocks before 
deallocation of the file space. If another user creates and pre- 
extends a file (which also does not clear any disk blocks) and then 
proceeds to read blocks which he has not written, he may retrieve 
confidential information which previously occupied the assigned 
disk area. 



SOLUTION: 

This observation is correct. Unfortunately, all potential solutions 
to this problem would entail a great deal of system overhead. Owners 
of proprietary files should zero or use private file structures. 
Normally this does not present a problem since even a malicious user 
has no control over the disk area allocated to his files. Hence, 
it is unlikely that he will retrieve useful information. Further- 
more, during normal timesharing operations, the data left behind 
would be overwritten as files are created and deleted. 
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User File Directories 



PROBLEM: 



When User File Directories are clustered greater than the pack cluster 
size, creating more or larger files may be impossible because of 
insufficient contiguous space for extending the UFD. 



SOLUTION : 

Pre-extending files would waste space in the disk structure. The user 
who has the foresight to prepare for large files by setting the UFD 
cluster size larger than the pack cluster size must make the advance 
preparations to follow through by pre-extending his own files. (Once 
the UFD has been extended, it will not get smaller.) 
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File Protection Codes 



The RSTS/E system provides a number of ways to set or 
modify the protection code of a file. A number of recent 
SPR's indicate that the subject is generally not well 
understood. This article will, hopefully, offer 
clarification. The following is a list of the means for 
setting and modifying protection codes. 



COMPILE 

The low order six bits of the user supplied code are 
retained, and the system sets the compiled file bit (code 
64) and resets the privileged program bit (code 128), 



EXAMPLES 



COMPILE<0> 

C0MPILE<40> 

C0MPILE<128> 

C0MPILE<232> 

COMPILE 



RESULTING 
PROTECTION CODE 

64 

104 

64 

104 

64 + System/job default 
(specified in an ASSIGN) 
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OPEN Statement 

When an OPEN statement which creates a file also specifies 
a protection code, the system will ignore any attempt to 
set the privileged program (128) or compiled file (64) 
protection codes. 

NAME AS Statement 

The "NAME AS" statement allows a privileged user to assign 
any protection code to a file, while a non-privileged user 
may assign all privileged codes except (128) privileged 
program and (64) compiled file. 



m 



PIP/RE Statement 

The renaming option in PIP utilizes a NAME AS command and 
therefore, obeys the "NAME AS" protection code rules. 

PIP Transfers 

In transferring a file, PIP utilizes an OPEN FOR OUTPUT 
command. This does not allow specification of either the 
COMPILED FILE (64) or PRIVILEGED PROGRAM (128) protection 
codes in the OUTPUT file specification. 

BACKUP Transfers 

BACKUP utilizes an "OPEN FOR OUTPUT" statement for 
privileged or non-privileged users. 

It then executes a "NAME AS" statement for privileged 
users only. Therefore, non-privileged users cannot retain 
either the Compiled File or Privileged user protection 
codes . 



CONCLUSION 

The file protection codes set/reset mechanisms which are 
described above represent an orderly approach to the 
protection of files from non-privileged users. A detailed 
description of the privileged program protection code is 
contained in the RSTS/E Programming Manual 
(DEC-1 1-ORPMA-A-D) . 
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SPECIAL LINE PRINTER DRUMS - OPTIONAL DRIVER PATCH 



The DEC standard LPll 
character position which 
SPACE character). Several 
a special symbol In th 
special character Is the 
Another special drum has 
countries which includes t 
line printer driver Is 
drums. A single word pate 
which will cause the s 
hardware modification Is a 
character. 



1 Ine printer drums 
corresponds to oct 

non-standard drums a 

is character position 

British Pound Ste 

been proposed for use 

he n In the SPACE pos 

coded to handle the 
h is used to define 
pedal symbol to be 
Iso required to enabl 



have one unused 
al code Oi^O (ASCI I 
re available with 
. The most common 
rl Ing symbol £ . 

In Latin American 
ition. The RSTS/E 
se special printer 
the ASCII code 
printed. A simple 
e printing of the 



LPll printers are normally wired to print ASCII codes OUl 
through 137 (octal) for the 5i* character set, or OUl through 177 
for the 96 character set. In addition to the normal printing 
character set, the command characters carriage return (015), line 
feed (012), and form feed (OIU) cause the appropriate printer 
response. The SPACE character, "non-printing" characters 
( < OUO ), and character codes > 137 on a printer with the 51* 
character set all print as spaces. The space is created by no 
printer action rather than a hammer actually striking the SPACE 
position on the drum. The hardware modification mentioned above 
extends the range of printing characters to Include octal code 
QUO. If the drum contains a special symbol in the Oi*0 position, 
any OifO code sent to the printer will cause the special character 
to be printed. The wiring changes required for the various DEC 
standard printers Is detailed on the last page of this article. 

The single word patch to the RSTS/E line printer driver Is 
also straightforward. To permit the use of special drums, the 
driver normally translates all 040 codes (SPACES) to 037 (octal). 
Since 037 is a non-prlntlng character on all LPlls, spaces still 
print as spaces. If the hardware modification Is Installed, the 
printer expects to use code OUO for the special character. The 
patch, therefore, defines a 7 bit code which will be translated 
to OUO (In the driver) before being sent to the printer. 
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Since there are many possible special characters, the choice 
of a character code to represent the special symbol Is left up to 
the system manager. Ideally a character should be chosen that Is 
not commonly used for other purposes but can be typed and printed 
on any standard terminal. This will allow the special symbol to 
be Inserted Into text Intended for the printer using any standard 
editor. The choice must be made with some discretion since the 
conversion performed In the driver overrides the standard symbol 
(If any) for the selected character code. Thus If the 101 code 
(the letter A) was selected, the special character would print In 
place of every letter A sent to the printer. In fact. It would 
then be Impossible to print an A. Obviously, 101 Is not a good 
choice until A Is deleted from the alphabet. All normal prlntng 
characters have some meaning to RSTS/E or BASIC-PLUS. There are 
a few possible choices, however, which would cause only minor 
restrictions. The use of the character codes for & (0«»6), (3 
(100), and CONTROL/N (016) are considered below. 
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seldom used In printed reports or text 
some physical similarity between & and £ , 
) might be a good choice for the Pound 
tain types of conflicts In the use of a 
any real problem. For example, the & 
d to represent the [1,5] auxiliary library 
cations. There Is no ambiguity If the & 
to represent the special symbol In text or 
e printer. If a BASIC-PLUS program which 
clflcatlon Is listed on the printer, the & 
lal character. If this effect Is not 
ry library account can be named explicitly 
he & character Is used by RUNOFF to denote 
normally passed to the RUNOFF output file, 
aracter can be passed to the output file 

underscore character In the RUNOFF source 



The Q character Is also seldom used In printed material. In 
BASIC-PLUS the @ character can also be used In file 
specifications to denote an assignable account. This standard 
use of the @ character will not conflict with the use of @ to 
represent a special printer symbol except In BASIC-PLUS program 
1 Istlngs. 
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If none of the standard printable characters are considered 
suitable, one of the ASCII control characters ( < OUO ) might be 
used. For example, CONTROL/N (016) can be generated with most 
terminals and will echo and print as fN on RSTS/E terminals If UP 
ARROW mode Is selected with TTYSET. CONTROL/N Is used for direct 
cursor addressing on VT05 terminals but need not conflict with 
text uses of the character. CONTROL/N (015) might be a good 
choice for the n symbol. 

The possibilities presented above are only suggestions. 
There Is probably no "Ideal" character code to represent the 
special printer symbols. The only way to select an appropriate 
code Is to study the ASCII code tables and consider the normal 
uses for each character. It Is easy to eliminate most characters 
which will leave only a few open to further consideration. The 
procedure to patch the line printer driver is described below. 



PROCEDURE: 



1. This patch Is optional 
V05A-02 system. 



but may be Installed on any RSTS/E 



2. Obtain a listing of the RSTS load map. This map Is printed 
during system generation If a line printer Is available. 
Otherwise the map must be printed from the LICIL tape created 
during SYSGEN (DECtape or magtape distribution) or from the 
System Generation DECpack (RK distribution). If the 
distribution medium is DECtape or magtape, print the file 
RSTS. MAP from the LICIL tape using PIP under RSTS, the system 
generation monitor, or any DOS monitor. If the distribution 
medium Is RK disk cartridge, use extended PIP under RSTS with 
the /DOS switch to print the file RSTS. MAP from account I1,1J 
on the System Generation DECpack used for your system 
generation. Alternatively, bootstrap the System Generation 
DECpack, log Into the DOS/BATCH monitor with the LO 1,1 
command, and use PIP under DOS to print the map file. 
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3. 



k. 



On the first page of the RSTS 
Section Allocation Sysnopsis" 
the first number to the right 
column of numbers). 

[LPT] - 



map under the heading "Program 

find the section <LPT>. Record 

of the section name (first 



Select the character code to represent the special printer 
symbol as outlined In the discussion above. Write the 7 bit 
binary character code In the space below and convert the full 
16 bit v/ord to octal recording the result In the space 
provided. The value [CODE] will be used In the patch below. 



[CODE] 



000 000 00 




Write 7 bit code 
Convert to octal 



5. Bootstrap the RSTS/E system disk normally to load the 
Initialization Code Into memory. Then use the PATCH option 
of the INIT code to Install the patch as shown below. 



OPTION: PATCH 








MODULE NAME ? 


RSTS 






BASE ADDRESS ? 


[LPT] 






OFFSET ADDRESS 


? U72 






MODULE BASE 


OFFSET 


OLD 


NEW? 


RSTS [LPT] 


0001*72 


177777 


? [CODE] 


RSTS [LPT] 


000»*7«* 


001002 


? ^C 


OPTION: 









From 1* Above 
CONTROL/C Exit 
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PRINTER WIRING CHANGES: 



The hardware modification required Is different for the 
several printer models. As described above the purpose of the 
modification Is to extend the range of printing characters to 
Include octal OitO. When this code Is sent to the printer^ the 
SPACE position on the drum will be printed. If the drum has a 
special character In the SPACE position^ the change will permit 
printing of the special character. The changes required for the 
various printers are listed below. 



LPOl (2310) 



Wiring change required to card cage backplane. 
Remove wire from A3A4-36 and connect this wire 
through a IK pullup resistor to +5 Volts. 



LP02 (2»*10) 



Change to AR16 Data Register Card. Remove card 
from slot A3A2i». Lift Pin 5 on Z15 and tie Pin 
5 to ground. 



IPOk (21*70) 



Wiring change required to card cage backplane. 
Remove wire from A3A2U-0I| and connect this wire 
through a IK pullup resistor to +5 Volts. 



LP05 (2230) 



Insert jumper Wl on the Logic Control Board 
29-21112, 
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RP04 Position Failure 



PROBLEM: 

The head positioner in R 
occasionally fails- to locate 
cylinder. When a read or 
"Header Compare Error" is 
offset positioning are ineff 
compare if the heads are lo 
all recovery attempts fail, 
(ERR=13) is returned to the 
to read the same block will 
heads have moved to a di 
request . 



P04 moving head disk drives 
the READ/WRITE heads on the correct 
write operation is attempted, a 
returned by the drive. Retries and 
ective since headers will never 
cated on the wrong cylinder. After 
a "USER DATA ERROR ON DEVICE" 
Galling program. A second attempt 
normally be successful provided the 
fferent cylinder to service another 



The following patch to the RP04 disk driver will cause a drive 
recalibrate before offset recovery procedures are initiated. A 
recalibrate should correct any positioner error so that 
standard recovery procedures can succeed. 



PROCEDURE : 



This is a patch to the RP04 disk driver. It should be 
installed on all RSTS/E V06A-02 systems configured for RP04 
disks . 

Obtain a listing of the RSTS load map. This map is printed 
during system generation if a line printer is available. 
Otherwise the map must be printed from the LICIL tape 
created during SYSGEN (DECtape or magtape distribution) or 
from the System Generation DECpack (RK distribution). If 
the distribution medium is DECtape or magtape, print the 
file RSTS. MAP from the LICIL tape using PIP under RSTS, the 
system generation monitor, or any DOS monitor. If the 
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distribution medium is DECpack, use extended PIP under 
RSTS/E with the /DOS switch to print the file RSTS,MAP from 
account [1,1] on the System Generation DECpack. 
Alternatively, bootstrap the System Generation DECpack, 
LOGIN under account [1,1], and use PIP under DOS to print 
the file. 

On the first page of the RSTS map under the heading 
"Program Section Allocation Sysnopsi^,- find the section 
<RBDSK>» Record the first number to the right of each 
section name (first column of numbers). 



[RBDSK] = 
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□ Overlapped i - ■ 
THIRD Column = 0001346 | | 



Non-Overlapped 

THIRD Column = 001146 



Bootstrap the RSTS/E system disk normally to load the 
Initialization Code into memory. Then use the PATCH option 
of the INIT code to install the patch which follows. 
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4A. This section applies only to the overlapped seek driver 



OPTION: PATCH 
MODULE NAME ? RSTS 
BASE ADDRESS ? [RBDSK] 
OFFSET ADDRESS ? 1150 
MODULE BASE OFFSET 
RSTS [RBDSK] 001150 
RSTS [RBDSK] 001152 



From 3 above 

OLD NEW ? 

046517 ? 046507 

153402 ? To CONTROL/C Exit 



OPTION 



4B. This section applies only to the non-overlapped driver 



OPTION: PATCH 
MODULE NAME ? RSTS 
BASE ADDRESS ? [RBDSK] 
OFFSET ADDRESS ? 1074 
MODULE BASE OFFSET 
RSTS [RBDSK] 001074 
RSTS [RBDSK] 001076 



From 3 above 

OLD NEW ? 

046517 ? 046507 

153502 ? "fC CONTROL/C Exit 



OPTION; 
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Differences Between DEC and IBM Card Codes 



PROBLEM: 

The DEC 029 card code used by RSTS/E oomplies with the 
ANSI standard. IBM uses a card code which differs in 
three characters as shown below. 



CARD 
PUNCH 

1 1-8-2 

1 1-8-7 

12-8-7 



DEC 029 
(ANSI) 

] 



ASCII 
CODE 

135 

136 

041 



IBM 



ASCII 
CODE 

041 

135 

136 



If the DEC 029 card code is selected during the RSTS/E 
System Generation, the decode table can be changed to 
the IBM standard with a simple patch. Cards punched for 
use on IBM equipment can then be read without error. 



PROCEDURE : 



This is an optional patch to the 
table for IBM compatibility, 
installed on any RSTS/E yo6A-02 
for a card reader and DEC 



DEC 029 Card decode 
The patch may be 



029 



Q tr «a f o r 

card code 



r> ntrt f* i cr ^^ r* a /^ 



Obtain a listing of the RSTS load map. This map was 
printed during System Generation if a line printer 
was available at that time. Otherwise, the map must 
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be printed from the LICIL tape created at System 
Generation time (DECtape or magtape distribution) or 
from the System Generation DECpack (RK 
distribution) . If obtaining the map from tape 
media, print the file RSTS.MAP from the LICIL tape 
using PIP under RSTS/E, the System Generation 
monitor, or any DOS monitor. If the media is 
DECpack, use Extended PIP under RSTS with the /DOS 
switch to print the file RSTS.MAP from account 
[1,1]. Alternatively, bootstrap the System 
Generation DECpack, LOGIN under account [1,1], and 
use PIP under DOS to print the file. 

3. On the first or second page of the RSTS map under 
the heading "Program Section Allocation Synopsis" 
find the section <DCDCDR> and record the first 
number to the right of the section name (first 
column of numbers). 

[DCDCDR] = 



H. Bootstrap the RSTS/E system disk normally to load 

the initialization code into memory. Then use the 

patch option of the INIT code to install the 
following patch . 



OPTION: PATCH 

MODULE NAME? RSTS 

BASE ADDRESS? [DCDCDR] 

OFFSET ADDRESS? 7^ 

MODULE BASE OFFSET OLD NEW? 

RSTS [DCDCDR] 000074 022135 ? 022041 Change ] to 

RSTS [DCDCDR] 000076 024452 ? <LF> No change 

RSTS [DCDCDR] 000100 057073 ? 056473 Change + to 

RSTS [DCDCDR] 000102 023122 ? +C CONTROL/C Exit 



OPTION: PATCH 

MODULE? RSTS 

BASE ADDRESS? [DCDCDR] 

OFFSET ADDRESS? 122 

MODULE BASE OFFSET OLD NEW? 

RSTS [DCDCDR] 000122 044441 ? 044536 Change ! to f 

RSTS [DCDCDR] 000124 OO3OOO ? +C CONTROL/C Exit 



OPTION: 
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RP04 Temporary Unsafe Conditions 

The RPQk drive has a class of errors that cause the 
drive to be temporarily unsafe. These errors cause an 
error interrupt v/ith both the composite unsafe error 
bit and some other drive specific error bit on. Since 
these errors are of a temporary nature they should be 
retried just like other non-fatal errors. The RSTS/E 
RPdk driver currently treats all unsafe type error 
conditions as fatal. The patch below changes the 
error recovery logic to retry the unsafe errors. 



PROCEDURE: 



This Is a patch to 
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configured for RPOU disks. 
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on all RSTS/E VOGA-02 systems 
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On the first page of the RSTS map under the 
heading "Program Section Allocation Sysnopsis" 
find the section <RBDSK>. Record the first number 
to the right of each section name (first column of 
numbers) . 

(RBDSK) = 



There are two different RPOU drivers supplied with 
the Va6A-02 system. One Is the overlapped seek 
driver normally used on systems with two or more 
RPOU drives. The other Is a smaller 
non-overlapped driver used on single drive systems 
and on systems where monitor size Is critical. 
The location of the patch depends on which driver 
Is configured. To verify which driver Is 
configured, check the third number to the right of 
the section name <RBDSK> In the load map (third 
column of numbers). This Is the size of the 
driver (RBDSK CSECT) . The overlapped driver size 
Is 131+6 octal bytes. The non-overlapped driver Is 
lli+e octal bytes. Note which driver you have 
below. 



Overlapped THIRD Column = 0013'+5 
Non-overlapped THIRD Column - 00HU6 



k. Bootstrap the RSTS/E system disk normally to load 
the Initialization Code Into memory. Then use the 
PATCH option of the INIT code to Install the patch 

following. 
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page 3 of 3 



4A. This section applies only to the overlapped seek 
driver 



OPTION: PATCH 
MODULE NAME ? RSTS 
BASE ADDRESS ? (RBDSK) 
OFFSET ADDRESS ? 322 



MODULE 

RSTS 

RSTS 

OPTION: 



BASE 

(RBDSK) 

(RBDSK) 



OFFSET 
000322 
000324 



From 3 above 

OLD NEW ? 
00112»t ? 001123 
005260 ? tC CONTROL/C 



Exit 



option: patch 
module ? rsts 
base address ? 
offset address 
module base 
rsts (rbdsk) 
rsts (rbdsk) 



(RBDSK) 

? 5U0 
OFFSET 
OOOSi^O 
000542 



OLD NEW? 
047007 ? 007007 
001014 ? tC CONTROL/C 



Exit 



4B. This section applies only to the non-over lapped 
driver 



OPTION: PATCH 
MODULE NAME ? RSTS 
BASE ADDRESS ? (RBDSK) 
OFFSET ADDRESS ? 320 



MODULE 

RSTS 

RSTS 

OPTION: 



BASE 

(RBDSK) 

(RBDSK) 



OFFSET 
000320 
000322 



From 3 above 

OLD NEW ? 
001107 ? 001106 
011111 ? tC CONTROL/C 



Exit 



OPTION!; PATCH 
MODULE ? RSTS 
BASE ADDRESS ? 
OFFSET ADDRESS 



MODULE 

RSTS 

RSTS 

OPTION: 



BASE 

(RBDSK) 

(RBDSK) 



(RBDSK) 

? 474 
OFFSET 
000474 
000475 



OLD NEW? 
047007 ? 007007 
001020 ? fC CONTROL/C 



Exit 
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Line Printer Interrupt Vector Assignments 



The M7930 Line Printer Interface Module does not have 
the hardware facility to assert data bit 2 as part of 
the interrupt vector address. This presents a problem 
for RSTS/E systems with three or more printers since the 
RSTS/E SYSGEN will assign a vector address for LP2, LP4 , 
LPS, and LP7 which cannot be generated by 
hardware. The vectors and addresses assigned 
through LP7 are listed in the following table 
for LP2, LP4, LP5, and LP7 must be patched if 
is used for these printer units. 



the M7930 

for LPO 

Vectors 

the M7930 



In the near future, the M7258 Line Printer Interface 
Module will replace the M7930. The M7258 can assert 
data bit 2 and can therefore generate all standard 
printer vectors. For printers connected to an M7258, it 
is only necessary to select the correct vector when 
installing the module. The following patches do not 
apply for any printer connected to an M7258. 
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LINE VECTOR ASSIGNED UNIBUS 

PRINTER BY RSTS/E SYSGEN ADDRESS 
UNIT 



177514 
16M004 
1640U 
164024 
164034 
164044 
164054 
164064 



LPO 


200 


LP1 


170 


LP2 


174 


LP3 


270 


LP4 


274 


LPS 


774 


LP6 


770 


LP7 


764 



VECTOR ADDRESS TO USE 

FOR PRINTER MODULE 
M7930 M7258 

200 200 

170 170 

[LP2VEC]* 174 

270 270 

[LP4VEC]» 274 

[LP5VEC]» 774 

770 770 

[LP7VEC] 764 



* Interrupt Vector Address must be selected by DEC Field 
Service dependent on the hardware configuration. 



SOFTWARE PRODUCT 
RSTS/E EXECUTIVE 


VERSION 
V06A-02 


COMPONENT 
DEVICE DRIVER PATCHES 


VERSION 
N/A 


SUBPROGRAM OR ADDITIONAL INFORMATION 


SEQUENCE 
2.9.5* 


PAGE 
2 0'= 8 


NEW REPLACEMENT ARTICLE 

nj en 


ORIGINAL DATE 
February 1976 
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Line Printer Interrupt Vector Assignments 



PROCEDURE; 



3. 



The following patches apply to line printer units 
LP2, LP4, LPS, and LPT if and only if they are 
connected to M7930 interface modules. 



Obtain a listing of the RSTS load ma 
printed during System Generation if 
was available at that time. Otherwi 
be printed from the LICIL tape ere 
Generation time (DECtape or magtape 
from the System Generation 
distribution) . If obtaining the 
media, print the file RSTS. MAP from 
using PIP under RSTS, the System Gen 
or any DOS monitor. If the media i 
Extended PIP under RSTS with th 
print the file RSTS. MAP from account 
System Generation DECpack. Alternat 
the System Generation DECpack, LOGIN 
[1,1], and use PIP under DOS to prin 



p. This map was 
a line printer 
se, the map must 
ated at System 
distribution) or 

DECpack (RR 
map from tape 
the LICIL tape 
eration monitor, 
s DECpack, use 
e /DOS switch to 

[1,1] on the 
ively, bootstrap 

under account 
t the file. 



On about the twelfth page of the RSTS map locate the 
heading "»»»TITLE: MON IDENT:06A.02 FILE : RSTS .OBJ" . 
Scan down the left column for the section <MON> and 
locate the tag FTLXXX in the listing of global 
symbols below the section heading. Record the first 
number to the right of the tag FTLXXX. 

[FTLXXX] = 



SOFTWARE PRODUCT 

RSTS/E EXECUTIVE 


VERSION 
V06A-02 


COMPONENT 
DEVICE DRIVER PATCHES 


VERSION 

N/A 


SUBPROGRAM OR ADDITIONAL INFORMATION 


SEQUENCE 
2.9.5* 


PAGE 

3 OF 8 


NEW REPLACEMENT ARTICLE 

q: CD 


ORIGINAL DATE 
February 1976 
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Line Printer Interrupt Vector Assignments 



Record the vector assignments made by DEC field 
service and verify that the corresponding M7930's 
have been correctly Jumpered for selected vectors. 

[LP2VEC] = 



[LP4VEC] s 



[LP5VEC] = 



[LP7VEC] 



5. Bootstrap the RSTS/E system disk normally to load 
the Initialization Code into memory. Then use the 
patch option of the INIT code to install the 
following patch. 



SOFTWARE PRODUCT 
RSTS/E EXECUTIVE 


VERSION 
V06A-02 


COMPONENT 
DEVICE DRIVER PATCHES 


VERSION 
N/A 


SUBPROGRAM OR ADDITIONAL INFORMATION 


SEQUENCE 
2.9.5* 


PAGE 
4 0"= 8 


NEW REPLACEMENT ARTICLE 


ORIGINAL DATE 
February 1976 
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Line Printer Interrupt Vector Assignments 



5A 



Vector Patch for LP2. 



OPTION: PATCH 
MODULE NAME? RSTS 
BASE ADDRESS? 
OFFSET ADDRESS? 174 
MODULE BASE OFFSET 
RSTS 000000 000171 
RSTS 000000 000176 
RSTS 000000 000200 



OLD 

[XXXXXX] 
[Y2Y2Y2] 
?????? 



NEW? 

? [FTLXXX] 

? 0043'»0 

? tC CONTROL/G 



Exit 



OPTION: PATCH 
MODULE NAME ? RSTS 
BASE ADDRESS ? 
OFFSET ADDRESS 
MODULE BASE 
RSTS 000000 
RSTS 000000 
RSTS 000000 



? [LP2VEC] 
OFFSET 
[LP2VEC] 
[LP2VEC3+2 
[LP2VEC3 + '^ 



OLD 

[FTLXXX]* 
00i»340» 
?????? 



NEW? 

? [XXXXXX] 

? [Y2Y2y2] 

? tC CONTROL/C 



Exit 



• The OLD contents of these locations should be 
verified. If they do not correspond to the values 
shown, the vector assigned is in use for some other 
device and should NOT be changed. Choose another 
interrupt vector address and cut the jumpers on the 
M7930 accordingly. 



SOFTWARE PRODUCT 

RSTS/E EXECUTIVE 


VERSION 
V06A-02 


COMPONENT 

DEVICE DRIVER PATCHES 


VERSION 
N/A 


SUBPROGRAM OR ADDITIONAL INFORMATION 


SEQUENCE 
2.9.5* 


PAGE 
5 0^8 


NEW REPLACEMENT ARTICLE 


ORIGINAL DATE 
February 1976 
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Line Printer Interrupt Vector Assignments 



5B. Vector Patch for LP4 



OPTION: PATCH 
MODULE NAME ? RSTS 
BASE ADDRESS ? 
OFFSET ADDRESS ? 274 
MODULE BASE OFFSET 
RSTS 000000 000274 

RSTS 000000 000276 

RSTS 000000 000300 



OLD 

[XXXXXX] 
[Y4Y1IY4] 
?????? 



NEW ? 

? [FTLXXX] 

? 004340 

? tC CONTROL/C 



Exit 



OPTION: PATCH 
MODULE NAME ? RSTS 
BASE ADDRESS ? 
OFFSET ADDRESS 
MODULE BASE 
RSTS 000000 
RSTS 000000 
RSTS 000000 



? [LP4VEC] 

OFFSET 

[LP4VEC] 

[LP4VECJ+2 

[LP4VEC]+4 



OLD 

[FTLXXX]* 

0043400* 

9?999'? 

• •••■• 



NEW? 

? [XXXXXX] 

? [Y4Y4Y4] 

? fC CONTROL/C 



Exit 



» The OLD contents of these locations should be verified. 
If they do not correspond to the values shown, the 
vector assigned is in use for some other device and 
should not be changed. Choose another interrupt vector 
address and cut the .lumpers on the M7Q?0 aooorrtlnffiv. 



SOFTWARE PRODUCT 
RSTS/E EXECUTIVE 


VERSION 

V06A-02 


COMPONENT 
DEVICE DRIVER PATCHES 


VERSION 
N/A 


SUBPROGRAM OR ADDITIONAL INFORMATION 


SEQUENCE 
2.9.5* 


PAGE 
60^8 


NEW REPLACEMENT ARTICLE 


ORIGINAL DATE 
February 1976 
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Line Printer Interrupt Vector Assignments 



5C. Vector Patch for LPS 



OPTION: PATCH 
MODULE NAME ? RSTS 
BASE ADDRESS ? 
OFFSET ADDRESS ? 774 
MODULE BASE OFFSET 
RSTS 000000 00077M 

RSTS 000000 000776 

RSTS 000000 001000 



OLD NEW? 

[XXXXXX] ? [FTLXXX] 

[YSYSYS] ? O0U3MO 

?????? ? tC CONTROL/C Exit 



OPTION: PATCH 
MODULE NAME ? RSTS 
BASE ADDRESS ? 
OFFSET ADDRESS 
MODULE BASE 
RSTS 000000 
RSTS 000000 
RSTS 000000 



? [LP5VEC] 

OFFSET 

[LP5VEC] 

[LP5VEC]+2 

[LP5VEC3+4 



OLD 
[FTLXXX]* 

oons'jo* 

?????? 



NEW? 

? [XXXXXX] 

? [Y5Y5Y5] 

? tC CONTROL/C 



Exit 



OPTION: 



• The OLD contents of these locations 
verified. If they do not correspond 
shown, the vector assigned is in use 
device and should NOT be changed, 
interrupt vector address and cut the 
M7930 accordingly. 



should be 

to the values 

for some other 

Choose another 

jumpers on the 



SOFTWARE PRODUCT 
RSTS/E EXECUTIVE 


VERSION 
V06A-02 


COMPONENT 

DEVICE DRIVER PATCHES 


VERSION 
N/A 


SUBPROGRAM OR ADDITIONAL INFORMATION 


SEQUENCE 
2.9.5* 


PAGE 

7 °'e 


NEW REPLACEMENT ARTICLE 


ORIGINAL DATE | 


m EH 


Februa 


ry 1976 
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Line Printer Interrupt Vector Assignments 



5D, 



Vector Patch for LP7 . 



OPTION: PATCH 
MODULE NAME ? RSTS 
BASE ADDRESS ? 
OFFSET ADDRESS ? 764 
MODULE BASE OFFSET 
RSTS 000000 000764 
RSTS 000000 000766 
RSTS 000000 000770 



OLD NEW? 

[XXXXXX] ? [FTLXXX] 

[y7Y7Y7] ? 004340 

?????? ? tc CONTROL/C Exit 



OPTION; 
MODULE 



PATCH 
NAME ? 



BASE ADDRESS ? 
OFFSET ADDRESS 



MODULE 
RSTS 
RSTS 
RSTS 



BASE 
000000 
000000 
000000 



RSTS 


? [LP7VEC] 
OFFSET 
[LP7VEC] 
[LP7VEC]+2 
[LP7VEC]+4 



OLD 

[FTLXXX]* 
[004340]* 
?????? 



NEW? 

? [XXXXXX] 

? [Y7Y7Y7] 

? tc CONTROL/C 



Exit 



OPTION: 



• The OLD contents of these locations should be 
verified. If they do not correspond to the values 
shown, the vector assigned is in use for some other 
device and should NOT be changed. Choose another 
interrupt vector address and cut the jumpers on the 
M7930 accordingly. 



SOFTWARE PRODUCT 
RSTS/E EXECUTIVE 


VERSION 
V06A-02 


COMPONENT 

DEVICE DRIVER PATCHES 


VERSION 
N/A 


SUBPROGRAM OR ADDITIONAL INFORMATION 


SEQUENCE 
2.9.5* 


PAGE 
8 01=8 


NEW REPLACEMENT ARTICLE 

[±2 nn 


ORIGINAL DATE 
February 1976 
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CRll CARD READER NOTES 



PROBLEM: 



The CRll card reader normally perforins a dark check at column 81 
of each card. Cards which have been verified using the IBM 129 
punch/verifier or similar devices will have a verification punch 
in column 81. This will result in a READ CHECK condition. 



SOLUTION : 

There is no way to fix this problem in software since the READ CHECK 
must be cleared manually at the card reader. There is, however/ a 
hardware fix: 

The presence or absence of a wire jumper between pad A and pad B 
on the "CLOCK" card inside the CRll reader selects either column 
or column 81 for the dark check. Refer to the Documentation M200 
Card Reader Manual for the clock card schematic and the location 
of this printed circuit card in the reader. 

JUMPER A-B 

IN Selects dark check at Column 
OUT Selects dark check at Column 81 

The jumper should be present (IN) if cards are read which have 
verification punches in column 81. 



SOFTWARE PRODUCT 

RSTS/E Executive 


VERSION 

V06A-02 


COMPONENT 

Device Driver Notes 


VERSION 
N/A 


SUBPROGRAM OR ADDITIONAL INFORMATION 

CRll Hardware 


SEQUENCE 
2.10.1 


PAGE 

1°'= I 




NEW 


REPLACEMENT ARTICLE 


ORIGINAL DATE | 




UJ 






1 
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CRll Card Reader Notes 



PROBLEM: 



The CRll card reader normally performs a dark check at coliimn 81 of each 
card. Cards which have been verified using the IBM 129 punch/verifier 
or similar devices will have a verification punch in column 81. This will 
result in a READ CHECK condition. 



SOLUTION: 

There is no way to fix this problem in software since the READ CHECK must 
be cleared manually at the card reader. There is, however, a hardware 
fix: 

The presence or absence of a wire jumper between pad A and pad B on the 
"CLOCK" card inside the CRll reader selects either column or column 81 
for the dark check. Refer to the Documentation M200 Card Reader Manual 
for the clock card schematic and the location of this printed circuit 
card in the reader. 

JUMPER A-B 

IN Selects dark check at Column 
OUT Selects dark check at Column 81 

The jumper should be present (IN) if cards are read which have verification 
punches in column 81. 



SOFTWARE PRODUCT 
RSTS/E Executive 


VERSION 
V06A-02 


COMPONENT 
Device Drivers General Notes 


VERSION 


SUBPROGRAM OR ADDITIONAL INFORMATION 


SEQUENCE « 
2.10.2 


PAGE 

OF 

1 1 


NEW REPLACEMENT ARTICLE 


ORIGINAL DATE 
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PROBLEM WITH "SAVE" AND "REPLACE" - BASIC PATCH 



A "SAVE" or "REPLACE" of a BASIC-PLUS program with no lines 
results In a one block file. Since this block Is never 
Initialized, a subsequent "OLD" or "RUN" to the file will give 
random and confusing results. The problem Is corrected by the 
patch below. 



PROCEDURE: 



1. This Is a patch to the BASIC-PLUS Run Time System, 
be Installed on all RSTS/E V06A-02 systems. 



It should 



2. 



3. 



Obtain a listing of the BASIC load map. This map Is printed 
during system generation If a line printer Is available. 
Otherwise the map must be printed from the LICIL tape created 
during SYSGEN (DECtape or magtape distribution) or from the 
System Generation DECpack (RK distribution). If the 
distribution medium Is DECtape or magtape, print the file 
BASIC. MAP from the LICIL tape using PIP under RSTS, the 
system generation monitor, or any DOS monitor. If the 
distribution medium Is RK disk cartridge, use extended PIP 
under RSTS with the /DOS switch to print the file BASIC. MAP 
from account (1,1) on the System Generation DECpack used for 
your system generation. Alternatively, bootstrap the System 



wl th the 
LO 1,1 command, and use PIP under DOS to print the map file. 









1/M» Tn4-n *-K<i nnC/RATf*H rtv^nl^/^r 



On the first page of the BASIC map under the heading "Program 
Section Allocation Sysnopsis" find the section <ED>. Record 
the first number to the right of the section name (first 
column of numbers). 



[ED] 
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SOFTWARE PRODUCT 

RSTS/E BASIC-PLUS 


VERSION 

V06A-02 


COMPONENT 

BASIC PATCHES 


VERSION 

N/A 


SUBPROGRAM OR ADDITIONAL INFORMATION 


SEQUENCE 
3.1.1 


PAGE 

1°'2 


NEW REPLACEMENT ARTICLE 

X 1 


ORIGINAL DATE 



SORWARE DISBMCH 


RSTS/E 


August 1975 



U. Bootstrap the RSTS/E system disk normally to load the 
Initialization Code Into memory. Then use the PATCH option 
of the INIT code to Install the patch as shown below. 



OPTION: PATCH 








MODULE NAME ? 


BASIC 






BASE ADDRESS ? 


[ED] 






OFFSET ADDRESS 


? 3i*35 






MODULE BASE 


OFFSET 


OLD 


NEW? 


BASIC [ED] 


003»*36 


000001 


? 


BASIC [ED] 


003t*l»0 


000016 


? +C 



CONTROL/C Exit 



OPTION; 



SOFTWARE PRODUCT 

RSTS/E BASIC-PLUS 


VERSION 

V06A-02 


COMPONENT 

BASIC PATCHES 


VERSION 

N/A 


SUBPROGRAM OR ADDITIONAL INFORMATION 


SEQUENCE 

3.1.1 


PAGE 

2^2 


NEW REPLACEMENT ARTICLE 

cn en 


ORIGINAL DATE 
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AUXILIARY LIBRARY ACCOUNTS - OPTIONAL SYSTEM PATCH 



The standard system library for RSTS/E systems 
[1,2]. This account Is normally referenced by the $ 
file specifications. The special characters 1 % and 
be used to reference three auxiliary libraries, 
assignments for auxiliary library accounts are ! for 

for [1,5]. Although the association 
defined, the three accounts must be 



[l,t»], and & 
with account Is 
REACT before 
specifications. 



Is account 

character In 

& can also 

The default 

[1,3], % for 

of character 

created with 



the special characters can be used In file 



In some applications It may be advantageous to change the 
account numbers referenced by the three special characters. The 
account numbers are defined by three words In the BASIC-PLUS Run 
Time System. The default account numbers are altered with a 
simple patch as described below. 



PROCEDURE: 



This Is an optional patch to the BASIC-PLUS 
to change the default account numbers 
library accounts. The patch may be 
V06A-02 system. 



Run Time System 

for the auxl 1 lary 

Installed on any RSTS/E 



Obtain a listing of the BASIC load map. This map I 
during system generation If a line printer Is 

n^hAruitcA «*hA man miie^ Ka pm-Im^a^ ^••i^m ^Ua I irii a. » 

during SYSGEN (DECtape or magtape distribution) o 
System Generation DECpack (RK distribution), 
distribution medium Is DECtape or magtape, prin 
BASIC. MAP from the LICIL tape using PIP under 
system generation monitor, or any DOS monitor 
distribution medium Is RK disk cartridge, use ext 
under RSTS with the /DOS switch to print the file 
from account [1,1] on the System Generation DECpack 
your system generation. Alternatively, bootstrap 
Generation DECpack, log Into the DOS/BATCH monitor 
LO 1,1 command, and use PIP under DOS to print the 



s printed 

aval lable. 

P8 created 

r from the 

If the 

t the file 

RSTS, the 

If the 

ended PIP 

BASIC. MAP 

used for 

the System 

with the 

map file. 
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SOFTWARE PRODUCT 

RSTS/E BASIC-PLUS 


VERSION 

V06A-02 


COMPONENT 

BASIC Patches 


VERSION 

N/A 


SUBPROGRAM OR ADDITIONAL INFORMATION 

Auxiliary Library Accounts 


SEQUENCE 

3.1.2 


PAGE 

1°% 


NEW REPLACEMENT ARTICLE 


ORIGINAL DATE 



SOFTWARE DISPATCH 



RSTS/E 



August 1975 



On the first page of the BASIC map under the heading "Program 
Section Allocation Sysnopsls" find the section <PN>. Record 
the first number to the right of the section name (first 
column of numbers). 

[PN] » 



k. Decide what account numbers you wish to use for each special 
character and record those number on lines 5.C/ 5.C, AND 7.C 
below. Any or all of the default assignments can be changed. 
Follow the procedure and example presented below. 

Write the desired account number on line C. Convert the 
project number to eight bit binary; do the same for the 
programmer number. Remember that project and programmer 
numbers are expressed In decimal under RSTS. Write the two 
eight bit numbers on line D. Next/ copy all 16 bits to line 
E which Is divided for correct conversion to octal. Convert 
the 16 bit binary number to a 6 digit octal number and record 
that result on line F. The value on line F Is used In the 
patch. 



A. SPECIAL CHARACTER 

B. DEFAULT ACCOUNT 

C. DESIRED ACCOUNT 

D. CONVERT TO BINARY 

E. COPY 15 BITS 

F. CONVERT TO OCTAL 



1 
11,3] 
[ 220 , 36 ] 
11011100 , 00100100 
1 101 110 000 100 100 
1 5 6 »* U 



SOFTWARE PRODUCT 

RSTS/E BASIC-PLUS 


VERSION 

V06A-02 


COMPONENT 

BASIC Patches 


VERSION 

N/A 


SUBPROGRAM OR ADDITIONAL INFORMATION 

Auxiliary Library Accounts 


SEQUENCE 

3.1.2 


PAGE 

2°% 


NEW REPLACEMENT ARTICLE 


ORIGINAL DATE | 


m 
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5. Rek>e3t procedure for your ! library 



A. SPECIAL CHARACTER 

B. DEFAULT ACCOUNT 

C. DESIRED ACCOUNT 

D. CONVERT TO BINARY 

E. COPY 15 BITS 

F. CONVERT TO OCTAL 



[1,3J 



6. Repeat procedure for your % library. 

A. SPECIAL CHARACTER ?i 

B. DEFAULT ACCOUNT [1,4] 

C. DESIRED ACCOUNT [ , 1 

D. CONVERT TO BINARY , 

E. COPY 16 BITS 

F. CONVERT TO OCTAL 



7. Repeat procedure for your & library. 

A. SPECIAL CHARACTER & 

B. DEFAULT ACCOUNT [1,5] 

C. DESIRED ACCOUNT [ , ] 

D. CONVERT TO BINARY , 

E. COPY 16 BITS 

F. CONVERT TO OCTAL 
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SOFTWARE PRODUCT 

RSTS/E BASIC-PLUS 


VERSION 

V06A-02 


COMPONENT 

BASIC Patches 


VERSION 

N/A 


SUBPROGRAM OR ADDITIONAL INFORMATION 

Auxiliary Library Accounts 


SEQUENCE 

3.1.2 


PAGE 

3 °^ 


NEW REPLACEMENT ARTICLE 


ORIGINAL DATE 



SORW^RE DISRMCH 


RSTS/E 


August 1975 



8. Bootstrap the RSTS/E system dfsk normally to load the 
Initialization Code Into memory. Then use the PATCH option 
of the INIT code to Install the patch as shown below. 



OPTION: 


PATCH 












MODULE 


NAME ? 


BASIC 










BASE ADDRESS ? 


[PN] 










OFFSET 


ADDRESS 


? 










MODULE 


BASE 


OFFSET 


OLD 


NEW? 






BASIC 


[PN] 


000000 


000U02 


? <llne feed> 


No Change 




BASIC 


[PN] 


000002 


000403 


? <account> 


From Line 


5.F 


BASIC 


[PN] 


OOOOOI* 


OOOifOlj 


? <account> 


From Line 


6.F 


BASIC 


[PN] 


000006 


000405 


? <account> 


From Line 


7.F 


BASIC 


[PN] 


000010 


XXXXXX 


? tc 


CONTROL/C 


Exit 


OPTION: 















SOFTWARE PRODUCT 

RSTS/E BASIC-PLUS 


VERSION 

V06A-02 


COMPONENT 

BASIC Patches 


VERSION 

N/A 


SUBPROGRAM OR ADDITIONAL INFORMATION 

Auxiliary Library Accounts 


SEQUENCE 

3.1.2 


PAGE 


NEW REPLACEMENT ARTICLE 

X 


ORIGINAL DATE 
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SPECIAL PRINT USING OPTIONS - OPTIONAL BASIC PATCH 



s for floating 
s to the left of 

decimal point. 
he United States 
r other monetary 

float the Pound 
s used In place 
a floating Franc 
n the floating 
also reversed In 
999.999,02). 

To accommodate these differences In monetary systems, 
Print-Using Is coded to allow substitution of any character for 
the floating currency symbol, the decimal point character, and 
the "every three digit character". These three characters are 
defined by three bytes In the PX Program Section In BASIC. 
System defaults and several suggestions are shown In the table 
below : 





The 


Print 


-Using option of BASIC- 


PLUS provide 


doll 


ar 


signs. 


comma 


Insertion every 


three digit 


the 


dec I 


mal po 


Int, and 


of course prin 


ting of the 


The 


$-s 


Ign I 


s used for the currency 


symbol In t 


and 


Cana 


da but 


various 


others symbols 


are used fo 


systems. 


In 


England 


It would be 


useful to 


Ster 


ling 


symbol (or 


whatever ASCI 1 


character I 


of 


the 


£ ) 


Instead 


of the $-sIgn. 


In France 


symb 


ol ( 


or F) 


would be 


general ly more 


useful tha 


$-sI 


gn. 


The 


role of the comma and 


period are 


France { 


e.g. 


9999999.02 should be pr 


Inted as F9. 



LOCATION 



USAGE 



DEFAULT ENGLAND FRANCE 



PX + FLOATING CURRENCY SYMBOL $ (Okk) & (0»i5) 
PX + 1 DECIMAL POINT CHARACTER . (056) . (056) 
PX + 2 EVERY THREE DIGIT CHARACTER , (05Jt) , (051*) 



F (106) 
, (05U) 
. (056) 



Substitution of different characters, such as those listed 
under England and France above. Is done with a simple patch. Any 



change will effect both the Frlnt-Uslng format string and the 

"FRANCE" 



output produced. For example. If the suggestions under 

were Installed, the following Print-Using statement would result 

In the output shown : 

PRINT USING "FF#. ######, ##",3673298. 02, 1*51*5. 20 

F3. 673. 298, 02 
Ft*. 1*51*, 20 

Since any change In this area does render the Print-Using 
documentation slightly Incorrect, an appropriate note should be 
published for users of the system. 
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SOFTWARE PRODUCT 

RSTS/E BASIC-PLUS 


VERSION 

V05A-02 


COMPONENT 

BASIC Patches 


VERSION 

N/A 


SUBPROGRAM OR ADDITIONAL INFORMATION 

PRINT USING 


SEQUENCE 

3.1.3 


PAGE 

1°^ 


NEW REPLACEMENT ARTICLE 

X 


ORIGINAL DATE 



SOFTWARE DISRMCH 


RSTS/E 


August 19/b 



PROCEDURE: 



1. This Is an optional patch to the BASIC-PLUS Run Time System 
to change the floating currency symbol, decimal point 
character, and/or the "every three digit character". The 
patch may be Installed on any RSTS/E V06A-02 system which Is 
configured for PrInt-Uslng. 

2. Obtain a lifting of the BASIC load map. This map Is printed 
during system generation If a line printer Is available. 
Otherwise the map must be printed from the LICIL tape created 
during SYS6EN (DECtape or magtape distribution) or from the 
System Generation DECpack (RK distribution). If the 
distribution medium Is DECtape or magtape, print the file 
BASIC. MAP from the LICIL tape using PIP under RSTS, the 
system generation monitor, or any DOS monitor. If the 
distribution medium Is RK disk cartridge, use extended PIP 
under RSTS with the /DOS switch to print the file BASIC. MAP 
from account 1,1 on the System Generation DECpack used for 
your system generation. Alternatively, bootstrap the System 
Generation DECpack, log Into the DOS/BATCH monitor with the 
LO 1,1 command, and use PIP under DOS to print the map file. 

3. On the first page of the BASIC map under the heading "Program 
Section Allocation Sysnopsls" find the section <PX>. Record 
the first number to the right of the section name (first 
column of numbers). 

[PX] - 



k. Select the characters to be used for the floating currency 
symbol and the decimal point and Insert the 7 bit ASCII codes 
for each on line D below. If one of the characters should 
not be changed, merely carry the default value down to line 
D. Next, copy all 15 bits to line E which Is divided for 
correct conversion to octal. Convert the 15 bit binary 
number to a 5 digit octal number and record that number on 
line F. The value on line F Is used In the patch. 



SOFTWARE PRODUCT 

RSTS/E BASIC-PLUS 


VERSION 

V06A-02 


COMPONENT 

BASIC Patches 


VERSION 

N/A 


SUBPROGRAM OR ADDITIONAL INFORMATION 

PRINT USING 


SEQUENCE 

3.1.3 


PAGE 
OF 

2 3 


NEW REPLACEMENT ARTICLE 

X 


ORIGINAL DATE 



SOFTWARE DISBMCH 


RSTS/E 


August 1975 



A. LOCATION 

B. DEFAULT CHARACTER 

C. DEFAULT CODE (BINARY) 

D. YOUR CODES (BINARY) 

E. COPY 16 BITS 

F. CONVERT TO OCTAL 



PX + 1 , PX ♦ 

. (056) , $ iOkk) 

00101110 , 00100100 

, 








[XXX] 



Select the character to be used for the "every three digit 
character" and Insert the 7 bit ASCII code on line D below. 
Note that the high order byte (PX+3) must remain zero. If 
the "every three digit character" should not be changed, 
simply Ignore this section entirely. The procedure Is the 
same as In section k above. 



A. LOCATION 

B. DEFAULT CHARACTER 

C. DEFAULT CODE (BINARY) 

D. YOUR CODE (BINARY) 

E. COPY 16 BITS 

F. CONVERT TO OCTAL 



PX+3 , PX + 2 

NULL (0) , , (054) 

00000000 , 00101100 

00000000 , 



00000000 , 




[YYY] 



Bootstrap the RSTS/E system disk normally to load 
of the INIT code to Install the patch as shown below. 



the 



rn I un w^» t i uri 



OPTION: PATCH 








MODULE NAME ? BASIC 








BASE ADDRESS ? [PXJ 








OFFSET ADDRESS ? 








MODULE BASE OFFSET 


OLD 


NEW? 




BASIC [PX] 000000 


02701*4 


? IXXXJ or <LF> From 4.F 


Above 


BASIC [PX] 000002 


000054 


? lYYY] or <LF> From 5.F 


Above 


BASIC [PX] OOOOOU 


XXXXXX 


? ^^C CONTROL/C 


Exit 


OPTION: 
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SOFTWARE PRODUCT 

RSTS/E BASIC-PLUS 


VERSION 

V06A-02 


COMPONENT 

BASIC Patches 


VERSION 
N/A 


SUBPROGRAM OR ADDITIONAL INFORMATION 

PRINT USING 


SEQUENCE 
3.1.3 


PAGE 

3°^3 


NEW REPLACEMENT ARTICLE 


ORIGINAL DATE 



RSTS/E Software Dispatch 
January 1976 



Array Data Destroyed by I/O Buffer Allocation 



PROBLEM: 

When an I/O channel Is opened the BASIC-PLUS I/O 
buffer allocator must shuffle other I/O buffers and 
array data around the newly allocated I/O buffer. 
After the data has been shuffled, the allocator must 
correct all references to the moved data. If an I/O 
channel Is re-opened without an explicit close and the 
new I/O buffer Is larger than the old I/O buffer, the 
allocator does not correctly change all moved data 
references. This error Is corrected by the following 
patch. 



PROCEDUBE ! 



1. 



This Is a 
It should 
systems. 



patch to the BASIC-PLUS Run Time System. 
be installed on all RSTS/E V06A-02 



Obtain a listing of the BASIC loa 
is printed during system generat 
printer is available. Otherwise 
printed from the LICIL tape create 
(DECtape or magtape dlstributio 
System Generation DECpack (RK dis 
the distribution medium Is DEC 
print the file BASIC. MAP from the 
PIP under RSTS, the system genera 
any DOS monitor. If the distrlbut 



d map. This map 
ion if a 1 Ine 
the map must be 
d during SYSGEN 
n) or from the 
trlbutlon). If 
tape or magtape, 
LICIL tape using 
tlon monitor, or 
Ion medium Is RK 



SOFTWARE PRODUCT 
RSTS/E BASIC-PLUS 


VERSION 
V06A-02 


COMPONENT 
BASIC Patches 


VERSION 

N/A 


SUBPROGRAM OR ADDITIONAL INFORMATION 


SEQUENCE 
3.1.4* 


PAGE 
1 OF 3 


NEW REPLACEMENT ARTICLE 


ORIGINAL DATE 

January 1976 
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page 2 of 3 



disk cartridge, use extended PIP under RSTS with 
the /DOS switch to print the file BASIC. MAP from 
account (1,1) on the System Generation DECpack 
used for your system generation. Alternatively, 
bootstrap the System Generation DECpack, log Into 
the DOS/BATCH monitor with the LO 1,1 command, and 
use PIP under DOS to print the map file. 



On the first page of the BASIC map under the 
heading "Program Section Allocation Synopsis" find 
the sections <RC> AND <PA>. Record the first 
number to the right of the section name (first 
column of numbers). 



(RC) = 



(PA) = 



k. Bootstrap the RSTS/E system disk normally to load 
the Initialization Code Into memory. Then use the 
PATCH option of the INIT code to Install the patch 
as shown below. 



OPTION: PATCH 
MODULE? BASIC 
BASE ADDRESS? (RC) 
OFFSET ADDRESS? 5720 



MODULE 


BASE 


OFFSET 


OLD 


NEW? 


BASIC 


(RC) 


005720 


001*767 


•? 


01*2700 


BASIC 


(RC) 


005722 


175U02 


? 


000001 


BASIC 


(RC) 


005721* 


01*2700 


? 


0011*02 


BASIC 


(RC) 


005726 


000001 


? 


001*737 


BASIC 


(RC) 


005750 


100002 


? 


(PA) 


BASIC 


(RC) 


005732 


012700 


? 


001*767 


BASIC 


(RC) 


00573U 


077776 


? 


176370 


BASIC 


(RC) 


005736 


01001*5 


? 


fC CONTROL/C 



Exit 
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OPTION: PATCH 
MODULE? BASIC 
BASE ADDRESS? (PA) 
OFFSET ADDRESS? 



MODULE 


BASE 


OFFSET 


OLD 


NEW? 


BASIC 


(PA) 


000000 


000000 


? 


100002 


BASIC 


(PA) 


000002 


000000 


? 


012700 


BASIC 


(PA) 


OOOOOU 


000000 


? 


077775 


BASIC 


(PA) 


000006 


000000 


? 


010203 


BASIC 


(PA) 


000010 


000000 


? 


060403 


BASIC 


(PA) 


000012 


000000 


? 


005763 


BASIC 


(PA) 


OOOOlii 


000000 


? 


000004 


BASIC 


(PA) 


000016 


000000 


? 


001410 


BASIC 


(PA) 


000020 


000000 


? 


020053 


BASIC 


(PA) 


000022 


000000 


? 


000004 


BASIC 


(PA) 


000024 


000000 


? 


001405 


BASIC 


(PA) 


000026 


000000 


7 


010045 


BASIC 


(PA) 


000030 


000000 


? 


005000 


BASIC 


(PA) 


000032 


000000 


? 


004776 


BASIC 


(PA) 


00003U 


000000 


? 


000002 


BASIC 


(PA) 


000036 


000000 


? 


012600 


BASIC 


(PA) 


000040 


000000 


? 


000207 


BASIC 


(PA) 


000042 


000000 


? 


tC CONTROL/C 


OPTION: 













Exit 
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Changing Default Scale Factor 



The system default SCALE factor may be modified by 
utilizing the procedure In this article (first patch). 
In addition, the warning message (SCALE FACTOR 
INTERLOCK) associated with SCALE may be deleted 
(second patch) . 



PROCEDURE : 


1. 


This 




It 




wl th 



Is a patch to the BASIC-PLUS Run Time System. 
s an optional patch and Is only for systems 
the 4-vvord, scaled match packages. 

2. Obtain a listing of the BASIC load map. This map 
is printed during system generation If a line 
printer Is available. Otherwise the map must be 
printed from the LICIL tape created during SYSGEN 
(DECtape or magtape distribution) or from the 
System Generation UECpack (RK distribution). If 
the distribution medium Is DECtape or magtape, 
print the file BASIC. MAP from the LICIL tape using 
PIP under RSTS, the system generation monitor, or 
any DOS monitor. If the distribution medium Is RK 
disk cartridge, use extended PIP under RSTS with 
the /DOS switch to print the file BASIC. MAP from 
account (1,1) on the System Generation DECpack 
used for your system generation. Alternatively, 
bootstrap the System Generation DECpack, log into 
the DOS/BATCH monitor with the LO 1,1 command, and 
use PIP under DOS to print the map file. 



SOFTWARE PRODUCT 
RSTS/E BASIC-PLUS 


VERSION 

V06A-02 


COMPONENT 
BASIC Patches 


VERSION 
N/A 


SUBPROGRAM OR ADDITIONAL INFORMATION 


SEQUENCE 

3.1.5* 


PAGE 
lO'=2 


NEW REPLACEMENT ARTICLE 


ORIGINAL DATE 
January 1976 
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3. From the BASIC map under the module 3U record the 
number to the right of the tag ..SCA. 

(..SCA.) = 



Next under the module ED find the tag ..SCE. and 
record the number to the right of this tag. 

(..SCE.) = 



k. Bootstrap the RSTS/E system disk normally to load 
the Initialization Code into memory. Then use the 
PATCH option of the INIT code to install the patch 
as shown below. 

OPTION: PATCH 

MOUULE NAME ? BASIC 

BASE ADDRESS ? (..SCA.) 

OFFSET ADDRESS ? 

MODULE BASE OFFSET OLD NEVJ? 

BASIC (..SCA.) 000000 000000 ? (A) Note 1. 

BASIC (..SCA.) 000002 XXXXXX ? fC CONTROL/C Exit 

Note: A = The desired SCALE factor to 6. 



OPTION: PATCfi 
MODULE NAME ? BASIC 



BASE ADDRESS ? (. 


,.SCE.) 






OFFSET ADDRESS ? 









MODULE BASE 


OFFSET 


OLD 


NEW? 


BASIC (..SCE.) 


000000 


10ii577 


? U002i*0 


BASIC (..SCE.) 


U00002 


XXXXXX 


? fC CONTROL/C 



Exit 
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THE LEXICAL ANALYZER DOES NOT POOL LITERAL FLOATING POINT 1 



PROBLEM: Th« BASIC-PLUS lexical analyz-sr was coded 
literal floating point 1. 



to pool 



DISPOSITION; 
solved . 



By installing the patch below the probl 



will be 



1. This is a patch to the BASIC-PLUS Run-time System, 
be made on all V06A-02 systems. 



It should 



2. 



3. 



Obtain a listin 
during system 
Otherwise the m 
during SYSGEN 
System Generat 
distribution m 
BASIC. MAP from 
distribution m 
under RSTS with 
from account [ 
your system gen 
Generation DEC 
LO 1,1 command , 



g of the BASIC load ma 

generation if a li 
ap must be printed fro 

(DECtape or magtape d 
ion DECpack (RK di 
ediuffl is DECtape or 
the LICIL tape using a 
edium is RK disk car 

the /DOS switch to pr 
1,2] on the System Gen 
eration. Alternativel 
pack, log into the DO 

and use PIP under DOS 



p. This map is printed 
ne printer is available, 
m the LICIL tape created 
istribution) or from the 
stributlon). If the 

magtape, print the file 
ny DOS monitor. If the 
tridge, use extended PIP 
int the file BASIC. MAP 
eration DECpack used for 
y, bootstrap the System 
S/BATCH monitor with the 

to print the map file. 



On the first page of the BASIC map under the heading "Program 
Section Allocation Synopsis" find the S'^ction <LA> and record 
the first number to the right of the section name (first 
column of numbers). 



<LA> = 



4. Bootstrap the 
initialization 
of the INIT cod. 



RSTS/E system disk normally to load the 
code into memory. Then use the PATCH option 
to install the following patch. 



OPTION: PATCH 
MODULE? BASIC 
BASE ADDRESS? (LA) 
OFFSET ADDRESS? 3262 



MODULE 


BASE 


OFFSET 


OLD 


ne;;? 


BASIC 


(LA) 


003262 


162702 


? 062702 


BASIC 


(LA) 


003264 


XXXXXX 


? <LF> 


BASIC 


(LA) 


003265 


162705 


? 062705 


BASIC 


(LA) 


003270 


XXXXXX 


? tc CTRL/C Exit 


OPTION: 
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SUBSCRIPTING ERROHS 



PROBLEM: Und«r c-^rtain conditions (such as n-igativ; subscripts) 
th« BASIC-PLUS subscripting algorithms do not produc*; th»? 
SUBSCRIPT OUT OF RANGE -jrror as th-y should. 



DISPOSITION: This patch corrriots thr; problem. 

1. This is a patch to the BASIC-PLUS Run-time System. It should 
be made on all V06A-02 systems. 

2. Obtain a listing of the BASIC load map. This map is printed 
during system generation if a line printer is available. 
Otherwise the map must be printed from the LICIL tape created 
during SYSGEN ( DECtape or magtape distribution) or from the 
System Gener'ation DECpack (RK distribution). If the 
distribution medium is DECtape or magtape, print the fil-i 
BASIC. HAP from the LICIL tape using any DOS monitor. If the 
distribution medium is RK disk cartridge, use extended PIP 
under RSTS with the /DOS switch to print the file BASIC. MAP 
from account [1,2] on the System Generation DECpack used for 
your system generation. Alternatively, bootstrap the System 
Generation DECpack, log into the DOS/BATCH monitor with the 
LO 1,1 command, and use PIP under DOS to print the map file. 

3. Find under module XCMA2 (or XCMA^ for iJ-word) the global 
symbol INDARY. 

<INDARY> = 



4. Bootstrap the R3TS/E system disk normally to load the 
initialization code into memory. Then use the PATCH option 
of the INIT code to install the following patch. 



OPTION: PATCH 

MODULE? BASIC 

BASE ADDRESS? (INDARY) 

OFFSET ADDRESS? 104 

MODULE BASE OFFSET OLD NEW? 

BASIC (INDARY) 000104 002404 ? 103404 

BASIC (INDARY) 000106 003374 ? 101374 



BASIC 
OPTION; 



(INDARY) 000110 005740 ? tc CTRL/C Exit 
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MAT INVERSE FAILS AT SCALE FACTOR 6 



PHOBLEM: Th-j MAT inv-ers-i function fails at scalr; factor 6 and 
produces the error message SUBSCRIPT OUT OF RANGE. 



DISPOSITION: The following patches will correct this problem. 

1. This is a patch to the BASIC-PLUS Run-tirae System. It should 
be made on all Vt)6A-02 systems with MAT commands. 

2. Obtain a listing of the BASIC load map. This map is pr-inted 
during system gener'ation if a line printer is available. 
Otherwise the map must be printed from the LICIL tape created 
during SYSGEN ( DECtape or magtape distribution) or from the 
System Generation DECpaok ( RK distribution). If the distri- 
bution medium is DECtape or magtape, print the file BASIC. MAP 
fi'om the LICIL tape using any DOS monitor. If the distribu- 
tion medium is RK disk cartridge, use extended PIP under RSTS 
with the /DOS switch to print the file BASIC. HAP from account 
[1,2] on the System Generation DECpack used for your system 
generation. Al ter'nati vel y , bootstrap the System Generation 
DECpack, log into the DOS/BATCH monitor with the LO 1,1 com- 
mand, and use PIP under DOS to print the map file. 

3. On the first page of the BASIC map under the heading "Program 
Section Allocation Synopsis" find the section <MX> and recor-d 
the first number' to the r-ight of the section name (first co- 
lumn of number's). 

<f'IX> = 



Bootsti-ap the RSTS/E system disk nor'mally to load the ini- 
tialization code into memor'y. Then use the PATCH option of 
the INIT code to install the following; patch. 
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MAT INVERSE FAILS AT SCALE FACTOR 6 



P T 1 ij : PATCH 

MODULE? BASIC 

5A3E ADDRESS? ( l-,X ) 

OFFSET ADDkESS? 2 1 3 '^ 

I-IODULE BASE OFFSET OLD l-iSW? 

BASIC (MX) 00213*4 1753'*2 ? 1773'<2 

3ASIC (HX) 002136 177763 ? t C CTRL/C Exit 

OPTION: PATCH 

[lOD'JLE? BASIC 

BASE ADDRESS? (MX) 

OFFSET ADDRESS? 2176 

MODULE BASE OFFSET OLD NEW? 

BASIC (MO 002176 1753't2 ? 177312 

BASIC (.-IX) 002200 117115 ? TC CTRL/C Exit 

OPTION: PATCH 
MODULE? BASIC 
BASE ADDRESS? (t!X) 



OFFSET 


ADDRESS? 


2312 






MODULE 


BASE 


OFFSET 


OLD 


NEW? 


BASIC 


(MX) 


002312 


175330 


? 177330 


BASIC 


(HX) 


002314 


177644 


? <LF> 


BASIC 


(MX) 


02 316 


140330 


? <LF> 


BASIC 


(MX) 


002320 


146076 


? <LF> 


BASIC 


(MX) 


002322 


157372 


? 157376 


BASIC 


(MX) 


002324 


123521 


? tc CTRL/C 



Exit 

OPTIOW: PATCH 

MODULE? BASIC 

BASE ADRESS? (MX) 

OFFSET ADDRESS? 2556 

MODULE BASE OFFSET OLD NEW? 

BASIC (KX) 002556 153372 ? 153376 

BASIC (HX) 002560 002000 ? <LF> 

BASIC (MX) 002562 146075 ? <LF> 

BASIC (HX) 002564 161372 ? 161376 

BASIC (iiX) 002566 125277 ? tc CTRL/C Exit 

OPTION: 
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I.IMEDIATE MODE "RETURN' 



PROBLEM: Issuing thr; RETURN command fros iriim-?d iat-^ .nod-^ do-s 
not prop^ffly r'-^tut-n fi'om th- subroutin-^ and can caus-^ oth-^i- 
•TiffOfs such as m-rraoi-y .nana^-^m-tn t violations lat'^r-. Tnis patch 
cot'f-TiCts tn-^ pi'ODl-!m by aisallowins; an imm-^diatr! mod- r-fturn and 
giving th- PLEASE USE THE RU.M CO.MHAMD -rfOf instead. 



DISPOSITION: Tn-:^ following patch oorr-^cts th-; probX-m. 

1. This is a patch to th- BASIC-PLUS Run-tim- Syst-m. It should 
b^ Tiad'^ on all V06A-02 syst-tis. 

2. Obtain a listing of th>^ BASIC load -nap. Tnis map is print-d 
during syst-^m g^en-ration if a linr' pt-int-r is available. 
Oth-rwisr th-? map must b- pt'lnt-d ft'om thr^ LICIL tao- cr-^at-d 
dufing 3Y3GEN ( DECtap-; or .nagtap-? distribution) or from th- 
3yst-!m G-^n- ration DECpack (HK distr'ibution). If th- 
distribution m-dium is DECtap-? or- .nagtap'?, print th- fil- 
BASIC.MAP from th-:! LICIL tao- using any DOS monitor'. If th- 
distribution ra-dium is RK disk car' t r id^-:? , us- •^xtr-nd-^d PIP 
und-r R3TS with th^ /DOS switch to pr'int th- fil- BASIC. HAP 
fr'Offl account [1,2j on th- Syst-r^m Gr^n'^r-a t ion DECpack us-d for 
your' syst-r:n g-n-ration. Al t-'rnat i v-il y , bootstr'ap th- Syst'^^m 
G-rnr^r-ation DECpack, Iop: into the DOS/BATCH monitor with th- 
LO 1,1 command, and us-^ PIP und-r DOS to print th- map fi]-. 

3. On IP.", first pag- of thrs BASIC map undrtr th- h-ading "Pr'Ogram 
3-?ction Allocation Synopsis" find th-:; S'^ction <RC> and <PA>, 
I'-cor'd th-:! flr-st numb-r' to th-? right of th- s-ction nam-? 
(fir-st column of numb-^r's). 

< K C> = 



<PA> : 



Bootstr-ap th-:! RSTS/E syst-:-™ disk normally to load th- 
mitialization cod-? into S'^mor-y. Th-?n us- th- PATCH option 
of th-i INIT cod- to install th-? following patch. 
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IMMEDIATE MODE "RETURN" 

OPTION: PATCH 
MODULt:? BA3IC 
riASE ADDRESS? (RC) 
OFFSET ADDHE3S? 1524 



MODULE 


BASE 


OFFSET 


OLD 


NS 


i:n 


BASIC 


(RC) 


001524 


005362 


9 


004537 


BASIC 


(RC) 


001526 


000522 





(PA)+42 


BASIC 


(RC) 


001530 


005761 


9 


000420 


BASIC 


(RC) 


001532 


000006 


7 


000522 


BASIC 


(RC) 


001534 


001016 


9 


000240 


BASIC 


(HO 


001536 


016704 


? 


tc CTRL/C 



Exit 

OPTION: PATCH 

MODULE? BASIC 

BASE ADDRESS? (RC) 

OFFSET ADDRESS? 1640 

MODULE BASS OFFSET OLD tJEW? 

BASIC (RC) 001640 005041 ? 004737 

BASIC (RC) 001642 005241 ? (PA)+72 

BASIC (RC) 001644 016702 ? tc CTRL/C Exit 

OPTION: PATCH 
MODULE? BASIC 
BASE ADDRESS? (PA) 
OFFSET ADDRESS? 42 



MODULE 


BASE 


OFFSET 


OLD 


NEi'/? 


BASIC 


(PA) 


000042 





9 


005761 


BASIC 


(PA) 


4 4 


000000 


9 


000006 


BASIC 


(PA) 


000046 


000000 


9 


01010 


BASIC 


(PA) 


000050 





9 


005725 


BASIC 


(PA) 


000052 


000000 


9 


032761 


BASIC 


(PA) 


000054 


000000 


9 


000001 


BASIC 


(PA) 


000056 


000000 


9 


00000») 


BASIC 


(PA) 


000060 


000000 


9 


001403 


BASIC 


(PA) 


000062 


oooooo 


9 


005725 


BASIC 


(PA) 


000064 


000000 


9 


005362 


BASIC 


(PA) 


000066 


oooooo 


9 


000522 


BASIC 


(PA) 


000070 


oooooo 


9 


000205 


BASIC 


(PA) 


000072 


oooooo 


9 


005041 


BASIC 


(PA) 


000074 


oooooo 


9 


012741 


BASIC 


(PA) 


000076 


oooooo 


? 


000001 


BASIC 


(PA) 


000100 


oooooo 


9 


000207 


BASIC 


(PA) 


000102 


oooooo 


? 


tc CTRL/C 


OPTION: 













Exit 
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FILt; ;.IOT CLOSED PROPERLY 



PROBLEM: An input Of output lin-' aft-^r thn fi]- has b--n clos-d 
will som-^t i:,iT!S not f-^turn th-^ -rrTOf I/O CHANfvEL ,','OT OPEII. 



DISPOSITION: This patch corf-cts th-. probl-i^n. 

1. This is a patch to th-^ BASIC-PLUS Run-tim- Syst'^m. It should 
b-r mad-; on all V06A-02 systems. 

2. Obtain a listing of th-^ BASIC load map. This map is print-;d 
dur-ing syst-^m sen-oration if a line pr'intei' is availabl-. 
Otherwise the niap ,nust be printed froni th- LICIL tap" created 
during 3YSGEN (D£Ctape or aastaoe distribution) or fr'0;n the 
System Generation DECpack (HK distribution). If the distri- 
oution mediun is DECtape or' na^tap", print th- file BASIC. MAP 
from the LICIL tape usini^ any DOS .-nonitor. If th- distribu- 
tion Tiediua is RK disk cartridge, us- ext-nd-d PIP und-r R3TS 
With the /DOS switch to print the fil- DASIC.MAP from account 
[1,2 J on the System Generation DECpack used for your system 
generation. Al t-r-na t i V"ly , bootstrap th- System G-neration 
DECpack, I0.7 into th- DOS/BATCH monitor' with th- LO 1 , 1 com- 
mand, and use PIP und-r DOS to print th- map file. 

3. On the first paq;- of the 3ASIC map under- th- headin^r "Pro°:rax 
Section Allocation Synopsis" find the section <RC> and r-oord 
the fir'st number- to th- r-i'^ht of th- s-ction nam- (first co- 
lumn of number's). 

<RC> = 



4. Bootstr-ap the RSTS/E syste-n disk normally to load the ini- 
tialization 00a- into memory. Then use th- PATCH option of 
th- INIT cod- to install the following patch. 



OPTION: PATCH 

MODULE? BASIC 

BASE ADDRESS? CRC) 

OFFSET ADDRESS? 4664 

.iODULE BASS OFFSET OLD ?I£V;? 

BASIC (RC) 004664 5762 ? 005763 

BASIC (HC) 004666 000004 ? tc CTRL/C Exit 

OPTION': 
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fHIVILLGtiU PRCGSA.! CHAIIiING TO A .BAS FILE 



PrtOBLEH: If a pr' i v il -f^-d ofogfam I'jnnin? undft' a nan- nr iv il ^ f;"d 
account att-^mpts to chain to a .BAS ( non-conpi 1 -d ) Dfo.Tr'a-n , no 
a-jssag-^s ar-- giv-n but th- chain n-v-r occui's; th- NO NAME 

proHiram is s-it up instead. 



DISPOSITION: Th-i followint: patch corT-cts thr^ probl-^m. 

1. This is a patch to th- BASIC-PLUS Run-tim-^ Syst-^m. It should 
b-? mad-! on all V06A-02 syst-^ms. 

2. Obtain a listing of thr' BASIC load map. This map is printed 
dui'ing syst-rn stmH nation if a lin- print>*f is availabl-. 
Oth-fwis-^ thr) Tiap must b-^- pr'int-^d from th-^ LICIL tap- cr'eat-d 
during SY3GEW (DECtap-< or raa^tao- distribution) or from th- 
Syst-ra G-^n-ration DECpack (RK distribution). If th- 
distribution m-idium is DECtap- or aa?tap-, print th- fil- 
BASIC.MAP from th- LICIL tap-; using any DOS monitor. If th- 
distribution m-^diu-n is RK disk cartridg-, us- wxt'^nd-d PIP 
und-r' RSTS with th-; /DOS switch to print th- fil-^ BASIC. HAP 
fr'om account [1,2j on th-i System G-n-ration DECpack us-»d for 
your syst«ra g<in-r-ation . Al t-!rnat iv-^ly , bootstrap th-; Syst-T^m 
G-(n-ration DECpack, log into th- DOS/BATCH monitor with thr; 
LO 1,1 command, and us- PIP und-jr DOS to print th«; map fil-*. 

3. On th-5 fii'st pag-^ of th^ BASIC map und-r- th-' heading "Program 
S>iCtion Allocation Synopsis" find th- s-ction <SU> and r-cord 
th- first number to th'S right of th- s-^ction nam- (first 
column of numb-rs). 

<SU> = 



Bootstrap tn-! RSTS/E syst-m disk normally to load th- 
initialization cod- into ra-raory. Th-^n us- th- PATCH option 
of th- INIT cod-; to install th- following patch. 

OPTION: PATCH 

MODULE? BASIC 

BASE ADDRESS? (SU) 

OFFSET ADDRESS? 52 

I-IODULE BASE OFFSET OLD NEir.'? 

BASIC (SU) 000052 060400 ? 064400 

BASIC (SU) 000054 XXXXXX ? <LF> 

BASIC (SU) 000056 026627 ? 'C CTRL/C Exit 

OPTION: 
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• ii^riOHY MANAGEl'iErtT VIOLATION'S USIMG 3PACE$ 



PaOBLKM: Th-i 3PACE$ function will caus-^ a rn-irnot'y man a-'^-^m-n t vio- 
lation if its ai'Tu-n-^nt is 32767? + 1> (int-^^-T minus z-ro). 



DISPOSITION: This patch oorr-^cts th-^ pfoblnm. 

1. Tnis is a patch to thr^ BASIC-PLUS Run-tim- Syst-^m. It should 
be made on all V06A-02 systems. 

2. Obtain a listing of the BASIC load map. This rnao is print-^d 
during system feneration if a line printer' is available. 
Otherwise the map must be pr-inted from the LICIL tape created 
dui-ing SY3GEN (DECtape or magtape di sti-ibut ion ) or- from the 
System G-^neration DECpack (RK distribution). If the disti'i- 
bution medium is DECtape or magtape, print th- fil-^ BASIC. MAP 
from the LICIL tap- using any DOS monitor. If the distr'ibu- 
tion m-dium is RK disk carti'idge, use extend-d PIP und"r RSTS 
with the /DOS switch to print th- file BASIC. MAP from account 
[1,2] on the System Generation DECpack used for your system 
generation. Al ter'nati vel y , bootstrap the System Generation 
DECpack, log into the DOS/BATCH monitor with the LO 1,1 com- 
mand, and use PIP under DOS to print the map file. 

3. On the first cage of the BASIC map under the heading "Program 
Section Allocation Synopsis" find the section <RC> and record 
tne first number to th- right of the section name (first co- 
lumn o f numbei's) . 

<RC> = 



4. Bootstrap the RSTS/E system disk normally to load the ini- 
tialization cod- into memory. Tnen use the PATCH option of 



OPTION: PATCH 

MODULE? BASIC 

BASE ADDRESS? (RC) 

OFFSET ADDRESS? 12014 

MODULE BASE OFFSET OLD NEW? 



BASE 


OFFSET 


OLD 


(RC) 


012014 


100435 


(RC) 


012016 


110223 



BASIC (RC) 012014 100435 ? 002435 

BASIC (RC) 012016 110223 ? tc CTRL/C Exit 

OPTIOH: 
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REDIMENSIONING CAUSES ERRORS (SPR 11-5798 JC) 

Redimensioning arrays may cause memory management errors and UNIBUS 
timeouts. 

The following patch alleviates the problem. 

1. This is a patch to the BASIC-PLUS Run Time System. It should 
be made on all V06A-02 systems. 

2. Obtain a listing of the BASIC load map. This map is printed 
during system generation if a line printer is available. Other- 
wise the map must be printed from the LICIL tape created during 
SYSGEN (DECtape or magtape distribution) or from the System 
Generation DECpack (RK distribution) . If the distribution medium 
is DECtape or magtape, print the file BASIC. MAP from the LICIL 
tape using any DOS monitor. If the distribution medium is RK 
disk cartridge, use extended PIP under RSTS with the /DOS switch 
to print the file BASIC. MAP from account tl,2] on the System 
Generation DECpack used for your system generation. Alternatively, 
bootstrap the System Generation DECpack, log into the DOS/BATCH 
monitor with the LO 1,1 command, and use PIP under DOS to print 
the map file. 

3a. On the first page of the BASIC map under the heading "Program 
Section Allocation Synopsis," find the section <TP> and <PA>; 
record the first number to the right of the section name (first 
column of numbers) . 

<TR> = 

<PA> = 

3b. Find under module RC the global symbol THENT 

<THENT> = 

4. Bootstrap the RSTS/E system disk normally to load the initiali- 
zation code into memory. Then use the PATCH option of the INIT 
code to install the following patch. 

OPTION: PATCH 

MODULE NAME? BASIC 

BASE ADDRESS? tTR] 

OFFSET ADDRESS? 11510 

MODULE BASE OFFSET OLD NEW? 

BASIC [TR] 01151j2f 0!2f4767 700A737 

BASIC tTR] 011512 XXXXXX ?[PA]+102 

BASIC [TR] 011514 010400 ?tC CTRL/C EXIT 

RSTS/E BASIC-PLUS V06A-02 Seq 3.1.13* 

BASIC PATCHES 1 of 2 
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OPTION: 


; PATCH 








MODULE 


NAME? BASIC 








BASE ADDRESS? [PA] 








OFFSET 


ADDRESS? Ii2f2 








MODULE 


BASE 


OFFSET 


OLD 


NEW? 


BASIC 


[PA] 


102 





7042737 


BASIC 


[PA] 


104 





?000200 


BASIC 


[PA] 


106 





?0006 60 


BASIC 


[PA] 


110 





7013704 


BASIC 


[PA] 


112 





7000674 


BASIC 


[PA] 


114 





7005064 


BASIC 


[PA] 


116 





7000524 


BASIC 


[PA] 


120 





7000137 


BASIC 


[PA] 


122 





7[THENT] 


BASIC 


[PA] 


124 





7tC CTRL/C EXIT 



Tliis patch disables continuation after redimensioning. All variables 
are set to null or zero. Tlie program may tlien be rerun. 
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REPLACE MAY DELETE A PROGRAM WITHOUT REPLACING IT (SPR 11-6722 JC) 



The sequence of events during a REPLACE is as follows: 

1. REPLACE ascertains that a file with the same name exists on the 
storage medium. 

2. If the file exists, it is given a length of (providing patch 
3.1.1 has been installed). Giving it a length of essentially 
deletes the contents of the file on the storage medium. 

3. A buffer, in the user area, is allocated and the new version of 
the program is written to the storage medium. The length is 
modified to agree with the new program length. 

The problem occurs when there is not enough room in the user memory 
area for both the program and the buffer allocation. Under this 
circumstance, steps 1 and 2 above are completed, but step 3 is not. 
The error MAXIMUM CORE EXCEEDED is printed on the terminal, result- 
ing in the contents of the file being deleted on the storage medium 
but the new version of the program is not written into the file. 

This problem cannot be patched. However, there are two methods to 
alleviate the problem. Method 1 is to be used in lieu of REPLACE 
when it appears no other problems exist and method 2 is to be used 
only when the error message MAXIMUM CORE EXCEEDED was generated be- 
cause too much space was used in array or buffer allocation. 

1. Use of SAVE and RENAME 

Assume that a program called PROGl is to be edited. 
Follow this procedure . 

OLD PROGl 

RENAME PR0G2 

perform edits and then 

SAVE 

thus allowing PR0G2 to be written in its entirety to 
storage medium. PROGl remains as backup. 



RSTS/E BASIC-PLUS V06A-02 Seq 3.1.14 

BASIC PATCHES 1 of 2 



Editing STOP into the program. 

a. Edit STOP into the program, as the first line of 
the program. 

b. RUN program 



d. REPLACE 

If MAXIMUM CORE EXCEEDED appears again, the program is indeed 
too large. Some of the program must be deleted in order to 
SAVE it. 
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RSTS/E 


August 1975 



COMPILED PROGRAM INCOMPATIBILITY 

All BASIC-PLUS programs created under RSTS/E V05-21 must be recompiled 
before they can be used under RSTS/E V06A-0 2. Programs created under 
RSTS/E V05B-24 do not require recompilation. The intermediate code 
created by the BASIC-PLUS compiler changed slightly between V05-21 and 
V05B-24. Hence, the recompilation was necessary when upgrading from 
version V05-21 to V05B-24 and is necessary when upgrading from version 
V05-21 to V06A-02. There was no change in code from version V05B-24 
and V05C-01 to V06A-02. 

Whenever the intermediate code created by the BASIC-PLUS compiler is 
changed, the BASIC-PLUS version number stored in the compiled image 
is also changed. As noted above, th.e BASIC-PLUS version did not change 
from RSTS/E V0 5B-24 to V05C-01 and from V05C-01 to V06A-02. The Run 
Time System verifies the BASIC-PLUS version number when a compiled 
image (.BAC file) is loaded for execution. Any attempt to run a .BAC 
file compiled under a previous BASIC-PLUS version results in a PROGRAM 
LOST SORRY message. 

The requirement to have compatible BASIC-PLUS versions does not affect 
new installations since all programs are normally developed using 
RSTS/E V06A-02. Similarly, installations upgrading from V05B-24 or 
V05C-01 to V06A-02 are not affected. Only those installations upgrading 
from RSTS/E V05-21 to V06A-02 require the recompilations. 



SOFTWARE PRODUCT 
RSTS/E BASIC-PLUS 


VERSION 
V06A-02 


COMPONENT 

BASIC -PLUS Notes 


VERSION 
N/A 


SUBPROGRAM OR ADDITIONAL INFORMATION 


SEQUENCE 
3.2.1 


PAGE 

1 0^1 


NEW REPLACEMENT ARTICLE 

UK 


ORIGINAL DATE 
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SOFTWARE DISR^TCH 


RSTS/E 


February 1973 



Source Level Statements in BASIC 



PROBLEM: 



Source level statements in BASIC may occasionally be ambiguous 
miters. 



SOLUTION : 

The following are examples of language ambiguities. 

1. PRINT X FOR X=S TO P 
fails to compile but 
PRINT X FOR X=(S) TO P 
circumvents the ambiguity. 

2. PRINT IF OR 1=1 TO 10 
compiles as 

PRINT I FOR 1=1 to 10 

3. PRINT P IF OR 1=1 TO 5 
compiles as 

PRINT PI FOR 1=1 TO 5 



SOFTWARE PRODUCT 
RSTS/E BASIC-PLUS 



v/ERSlON 

V06A-^2 



COMPONENT 



VERSION 
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' 


r>JUC«s/ jriuyicuiuiij-ny n-Liii,t> 


1 


SUBPROGRAM OR ADar.")Oh'''L INFORMATION 


SEOLi^;:- = ! PAGE 1 

3.2.2 |1 ^'' 1 




NEW REPLACEMENT ARTICLE 

ZU 


ORIGINAL DATE 







SOFTWARE DISPATCH 


RSTS/E 


Pre-.1973 



Simultaneous Access to a File by Many Users 



PROBLEM: 

It is desirable to allow an entire group to access a file for reading 
data but only one of the group to be able to write in it. 



SOLUTION : 

It is suggested that the file be given a Protection Code of <60> 
and that a privileged program be provided that uses UPDATE mode 
but never writes in the file, only reads it. The actual updating 
of the file would be done by a nonprivileged program on the owner 
account, again using update mode. 



RSTS/E BASIC-PLUS 



COM'-'. ;f^e';T 

Notes/Programming Hints 



':,u;:.'"R;v^r^A^■ C' 



La 



V06A-)Zi2 





.rOHK'.ATIQN 




3.2.3 


! 1 ' 1 

. _ L. 


•^:':''l .-(A 


;w;'f',r apticl';- 




Of'.f: 



i:<K ;.A'; 




._J 
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SOFTWARE DISBftJCH 


RSTS/E 


October 1973 



Passing EOT Mark on Magtape 



PROBLEM: 

Passing the EOT (End Of Tape) mark on magtape gives an error but does 
not write an End Of File. This causes problem.s in the future reading 
of that tape. 



SOLUTION: 

RSTS makes no assumptions about how the user is using a magtape. An 
error is given indicating the occurrence of End Of Tape while writing. 
This error is trappable, and the user can write trailing information 
onto the tape at this time. One then should close the file, which will 
write three End-Of-File marks. 

If the user's program does not trap the error (no ON ERROR GOTO), then 
when his job returns to READY he should execute an immediate mode 
CLOSE or END statement to cause the EOFs to be written. 
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SOFTWARE PRODUCT 
RSTS/E BASIC- PLUS 


VERSION 
V06A-02 


COMPONENT 
Notes/Programming Hints 


VERSION 


SUBPROGRAM OR ADDITIONAL INFORMATION 


SEQUENCb » 
3.2.4 


PAGE 
1 °' 1 


NEW REPLACEMENT ARTICLE 


ORIGINAL DATE | 


CT ID 







SOFTWARE DISPATCH 


RSTS/E 


October 1973 



An ON ERROR GOTO with an Incorrect Target Statement Number 



PROBLEM: 

An ON ERROR GOTO with an incorrect target statement number can cause 
confusing error messages. 



SOLUTION : 

When a BASIC-Plus program executes an ON ERROR GOTO 40gSfS statement, 
it, in effect, says, "If any trappable error occurs, execute a GOTO 
4000. " 

If, when the error occurs in line 1450 of the program, there is no 
line 4000, a non-trappable error causes the message: 

STATEMENT NOT FOUND AT LINE 1450 

to be printed. This happens because the previous ON ERROR GOTO 
coupled with a trappable error is exactly equivalent to line 1450 
having contained a 

GOTO 4000 



RSTS/E BASIC-Plus 



Notes/Programming Hints 



Slje-'"i-'~GHAM 



N^'.V 



Oi.'"^ i.Vi-'OKMAliON 



V06A-02 






3.2.5 



1 ^" 1 



„_L. 



L£] 



RrrLACF'.'. -;- ^sPTICLE: 
I i 



G';.UiNAL tJAic' 



J 
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RSTS/E 


November 1973 



INPUT Giving Confusing Results 



PROBLEM: 

INPUT gives confusing results when variable names longer than those 
which are valid are used. For example: 

INPUT ROWS, COLS 



SOLUTION: 

INPUT does not require commas between variables in cases where there 
is no ambiguity. If, however, a recognizable BASIC-PLUS command is 
contained in the argument list, a syntax error will result. 

Above example is treated the same as : 

INPUT R,0,W,S,C,0,L,S 

although INPUT ABCDEF would give syntax error because of the DEF 
contained in it. 
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SOFTWART PhODUCT 
RSTS/E BASIC-PLUS 



COViPONENT 

Notes/Programming Hints 



SUBPROGRA)\i OR ■'•: i:V; 'r r-. ' i INFORMATION 



™_J- 



V!2(6A-02 



vfcFSiOr: 



PAGF 
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RSTS/E 


November 1973 



Floating Point Numbers That Appee.r to be Equal 



PROBLEM: 

Floating point numbers that appear to be equal and even print the 
same to many significant digits sometimes convert to different 
integer values when truncated. 



SOLUTION: 

Many decimal values cannot be represented exactly in binary, no 
matter how much precision. Numbers, when printed, are rounded to 
the number of digits printed; therefore, they can actually be slightly 
smaller than the value printed. If, for example, the number printed 
as 7371.00 is actually slightly less than that, perhaps 7370.9999, 
the integer equivalent, will be 7370 rather than 7371 as expected. 



SOFTWARE PRODUCT 
RSTS/E BASIC-PLUS 


VERSION 
V06A-02 


COMPONENT 

Notes/Programming Hints 


VERSION 


SUBPROGRAM OR ADDITIONAL INFORMATION 


SEQUENCE 

3.2.7 


PAGE 
1 OF 1 


NEW REPLACEMENT ARTICLE 
X 


ORIGINAL DATE 
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SORWARE DISRMCH 


RSTS/E 


September 1975 



Setting VT05 for UP (?) CURSOR (SPR 11-4987) 



PROBLEM: 



The "up cursor" key of a VT05B produces a CTRL/Z that is undesirable 
when a user wants cursor control. 



DISPOSITION: 

If a VT05B is set up with $TTYSET as a VT05 or SET SCOPE then output 
(computer to terminal) of CHR$(026) will cause a "cursor up." If 
input (terminal to computer) of the cursor key is desired, the 
program should then use "single character mode" which is invoked by 
executing .SYS (CHR$ (4)), The input handling of 026,q is specifically 
changed as follows. 



SINGLE CHARACTER 



NORMAL 
EOF (and trap error) Cursor up (no error trap) 



CHR$ ( ) 
026 

177 CHARACTER DELETE Passed to program 
021 LINE DELETE Passed to program 

This allows a user much more control over the display format. 



SOFTWARE PRODUCT 
RSTS/E BASIC-PLUS 


VERSION 
V05C-01 & V06A-02 


COMPONENT 
Notes/Programming Hints 


VERSION 
N/A 


SUBPROGRAM OR ADDITIONAL INFORMATION 


SEQUENCE 
3.2.8 


PAGE 
,0F ^ 


NEW REPLACEMENT ARTICLE 

X 1 


ORIGINAL DATE 
September 1975 
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RSTS/E 


September 1975 



SCALE Factors for V06A-02 



SUGGESTIONS i 



RUNning a program (.BAG) does not alter the job SCALE 
factor as set by SCALE n. The compiled program runs with 
the factor it was compiled with. V06A-02 documentation 
reflects this change. 

An installation note defines the process that allows the 
system manager to patch BASIC so that any SCALE factor 
(0 to 6) can be the LOGIN-time default value. 



SOFTWARE PRODUCT 
RSTS/E BASIC-PLUS 


VERSION 
V06A-02 


COMPONENT 
Notes/Programming Hints 


VERSION 

N/A 


SUBPROGRAM OR ADDITIONAL INFORMATION 


SEQUENCE 
3.2.9 


PAGE 
1 °'l 


NEW REPLACEMENT ARTICLE 


ORIGINAL DATE 
September 1975 
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Obtaining Job Niomber Using the PEEK Function 



The correct method for obtaining your job number using 
PEEK is: 

J^=(PEEK(518?) AND 255SS) /2% 

The PEEK of 518^ returns your job number times 2 in 
the low byte and the job number times 2 of the job to 
run next in the high byte. To obtain your job number, 
the low byte must be extracted and the result divided 
by 2. 



SOFTWARE PRODUCT 

RSTS/E BASIC-PLUS 



COMPONENT 

Notes/Prograinming Hints 



SUBPROGRAM OR ADDITIONAL INFORMATION 



NEW 



REPLACEMENT ARTICLE 



VERSION 

V06A-02 



VERSION 

N/A 



SEQUENCE 

3.2.10 



PAGE 

1 OFt 



ORIGINAL DATE 

January 1976 
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Program Lost-Sorry Messages 



There have been several questions related to PROGRAM 
LOST-SORRY message on RSTS/E V06A-02. In most cases, 
this message is preceeded by another message which 
gives the reason for the abort. For example: 

DISK ERROR DURING SWAP 

PROGRAM LOST-SORRY 

In V06A-02, there are four cases in which the PROGRAM 
LOST-SORRY message will not be preceded by a 
qualifying message. These conditions are discussed 
below with appropriate recommendations. 



I. Checksum Error on 
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SOFTWARE PRODUCT 

RSTS/E BASIC-PLUS 


VERSION 

V06A-02 


COMPONENT 

NOTES/PROGRAMMING HINTS 


VERSION 
N/A 


SUBPROGRAM OR ADDITIONAL INFORMATION 


SEQUENCE 

3.2.11* 


PAGE 
1 OF 5 


NEW REPLACEMENT ARTICLE 


ORIGINAL DATE 
February 1976 
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Program Lost-Sorry Messages 



Checksum errors can be caused by hardware malfunction 
or by intentional or accidental modfication of a .BAG 
file. Some of the hardware possibilities are: 

1. A disk read error which is not detected by the 
disk error detection logic (extremely rare). 

?. A di^k W'^'i'l'e or>r>ni-> i.;Vipr>o momnr'v Hafa '-jas 

incorrectly recorded on disk due to a bus 
transmission error. In this case, the disk 
correctly writes the data presented to it and 
therefore no error is detected on a read. 

3. Undetected memory parity errors, either from 

non-parity memory or one of a class of multiple 

bit errors which are not detected by memory parity 
hardware . 



SOFTWARE PRODUCT 
RSTS/E BASIC-PLUS 


VERSION 
V06A-02 


COMPONENT 

NOTES/PROGRAMMING HINTS 


VERSION 

N/A 


SUBPROGRAM OR ADDITIONAL INFORMATION 


SEQUENCE 
3.2.11* 


PAGE 
2 OF 5 


NEW REPLACEMENT ARTICLE 

^] CZl 


ORIGINAL DATE 
February 1976 
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Program Lost-Sorry Messages 



RSTS/E does not have specific protection to prevent 

alteration of a compiled image. A checksum mismatch 

can be caused by accidentally or intentionally opening 
and writing into a .BAG file. 

Recompilation will normally correct this problem for a 
particular program. However, frequent checksum errors 
indicate disk, memory, bus, or system problems, faulty 
application software; or malicious destruction of 
compiled files . 



II 



Disk Error on Read of a .BAG File 



An unrecoverable disk error during the load of a .BAG 
file will also result in a PROGRAM LOST-SORRY message. 
In this case, a disk read error will be logged. 

Unrecoverable read errors can be caused by bad disk 
sectors, dust, or a transient hardware problem in the 
disk subsystem. If the disk sector is not bad, 
rewriting the failing sector will frequently correct 
the problem. It is safer, however, to rename the .BAG 
file and leave it on disk to insure that the sector is 
not reused. This will avoid future problems in the 
case of a disk sector which is permanently bad. 
Recompile the program from the .BAS file for normal 
use . 



SOmWARE PRODUCT 

RSTS/E BASIC-PLUS 


VERSION 
V06A-02 


COMPONENT 

NOTES/PROGRAMMING HINTS 


VERSION 
N/A 


SUBPROGRAM OR ADDITIONAL INFORMATION 


SEQUENCE 
3.2.11* 


PAGE 
3 Of 5 


NEW REPLACEMENT ARTICLE 


ORIGINAL DATE 
February 1976 
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III. Unreasonable .BAG File Size 

Special care must be exercised when a .BAG file (or 
any binary file) is copied with PIP. The /BL, /CO, 
and /CO:T switches must be used to prevent a change in 
file size and to preserve .BAG file integrity. The 
size of a .BAG file (as indicated by DIRECT or PIP 
^^*y^^wy^*±\^af v^i \^ Lii^ onj.rti_jwu wumnianQ; must uDey tne 
following relations: 



< SIZE+1 < 64 



1 . e 



2K to 16K 



and 

((SIZE+1) .AND. 3)=0 i.e SIZE+1 is a multiple of 4 

A PROGRAM LOST-SORRY messages caused by improper .BAG 
file size is always repeatable but is not accompanied 
by an error being logged. It is easily fixed by 
recompiling the program from the .BAS file. To avoid 
the problem, the appropriate PIP operation should be 
used in any transfer of a .BAG file or any binary 
file: 



MTn: FILE. BAG < DISK : FILE . BAC/BL 
DISK: FILE. BAG < MTn : FILE . BAG/BL 



Disk to Magtape 
Magtape to Disk 



DTn: FILE. BAG < DISK : FILE . BAG/ GO 
DISK: FILE. BAG < DTn : FILE . BAG/ CO : T 

DISK: FILE. BAG < DISK : FILE . BAG/ BL 



Disk to Dectape 
Dectape to Disk 

Disk to Disk 



SOFTWARE PRODUCT 
RSTS/E BASIC-PLUS 


VERSION 
V06A-02 


COMPONENT 

NOTES/PROGRAMMING HINTS 


VERSION 

N/A 


SUBPROGRAM OR ADDITIONAL INFORMATION 


SEQUENCE 
3.2.11* 


PAGE 
4 OF 5 


NEW REPLACEMENT ARTICLE 

ID CD 


ORIGINAL DATE 
February 1976 
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IV. Mismatch of BASIC-PLUS Version Number 

Whenever the BASIC-PLUS compiler is changed to produce 
different intermediate code, the version number stored 
by the compiler in the compiled image is also changed. 
The version number is checked by the BASIC-PLUS Run 
Time System on each RUN or CHAIN to a .BAC file. A 
PROGRAM LOST-SORRY message will result if the version 
number stored in the compiled image does not match the 
version number of the running BASIC-PLUS system, 
indicating that the image was created by an 
incompatible version of BASIC-PLUS. 

The intermediate code (and the BASIC-PLUS version 
number) changed between V05-21 and V05B-24 of RSTS/E. 
The intermediate code did not change from V05B-24 to 
V05C-01 or from V05C-01 to V06A-02 . Thus any attempt 
to run a .BAC file created on V05-21 will fail on 
V05B-24, V05C-01, or V06A-02. Furthermore, BASIC-PLUS 
produces different code under the 2-word and 4-word 
math packages. Thus, recompilat ion is necessary if 
the math package changes, even under the same version 
of RSTS/E. This error is repeatable but is not 
accompanied by any error being logged . The program 
must be recompiled from the .BAS file. 

Refer to RSTS/E V06A-02 Software Dispatch Article 
#3.2.1 for additional information on compiled program 
compatibility . 



SOFTWARE PRODUCT 

RSTS/E BASIC-PLUS 


VERSION 

V06A-02 


COMPONENT 

NOTES/PROGRAMMING HINTS 


VERSION 

N/A 


SUBPROGRAM OR ADDITIONAL INFORMATION 


SEQUENCE 

3.2.11* 


PAGE 
5 OP 5 


NEW REPLACEMENT ARTICLE 


ORIGINAL DATE 
February 1976 
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True-False Values and the NOT Operator (SPR 11-6119 TT ) 



PROBLEM: 

The logical NOT can produce a true value for NOT V% when V% is 
true. 



SOLUTION: 

In BASIC-PLUS, logical values are represented by integers. 0% is 
used to indicate false, and any nonzero value indicates true. The 
logical NOT operator performs a bit-wise complement of the expres- 
sion which follows it. Hence, NOT V% = -1% when V% = 0% (false) and 
NOT V% = 0% when V% = -1%, For any nonzero (true) value V% not 
equal to -1%, NOT V% is also nonzero, hence true. The existence 
of multiple true values generally is transparent to the user since 
all relational operators (=, <, >, <=, >=, <>) use -1% for true. 
Hence, NOT (A% < B%) is either 0% or -1%. It is advisable to use 
expressions such as NOT V% only when V% has the values 0% or -1%, 
or when the logical complement of V% is desired. 



SOFTWARE PRODUCT 

RSTS/E BASIC-PLUS 


VERSION 
V06A-02 


COMPONENT 

NOTES/PROGRAMMING HINTS 


VERSION 

N/A 


SUBPROGRAM OR ADDITIONAL INFORMATION 


SEQUENCE 
3.2.12 


PAGE 

1 0^1 


NEW REPLACEMENT ARTICLE 


ORIGINAL DATE 
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Floating Point Anamolies 



PROBLEM: 



There is a discrepancy between the internal representation of 
floating point numbers and their representation when printed 
with the PRINT statement or converted to a string with the NUM$ 
function. An example follows: 



10 


I=.59 


20 


J=100*.59 


30 


I%=J 


40 


PRINT I,J,I% 


50 


END 



READY 



RUNNH 

.59 59 



58 



READY 



DISPOSITION : 

The discrepancy is due to the fact that it is iit^jossible to pre- 
cisely convert any decimal number whose fractional part is not the 
reciprocal of a power of two. BASIC-PLUS uses the closest approxi- 
mation possible. Hence, in the above example, .59 is represented 
by a binary number slightly less than 59. Step 30 removes the 
fractional part of J and stores the result (58) in 1%. In step 
40, the PRINT routine determines the values stored for I and J 
are actually approximations for .59 and 59, and hence prints .59 
and 59. (The NUM$ function behaves identically.) However, the 
value 58 is printed for 1% due to the truncation performed in 
step 30. 



SOFTWARE PRODUCT 
RSTS/E BASIC -PLUS 


VERSION 

V06A-02 


COMPONENT 
MATH PACKAGES 


VERSION 
N/A 


SUBPROGRAM OR ADDITIONAL INFORMATION 
Floating Point 


SEQUENCE 
3.4.1 


, PAGE 
1 OF 2 


NEW REPLACEMENT ARTICLE 


ORIGINAL DATE 
December 1975 
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Floating Point Anamolies 



To eliminate such discrepancies, the user should add a small frac- 
tion to a floating point niamber before conversion to an integer. 
In the following example, step 30 has been changed. Step 40 
prints 59 for J and 1%. 



30 



I%=J+.5 



RUNNH 
.59 59 



59 



READY 



SOFTWARE PRODUCT 
RSTS/E BASIC" PLUS 



COMPONENT 

MATH PACKAGES 



SUBPROGRAM OR ADDITIONAL INFORMATION 
Floating Point 



NEW 
X 



REPLACEMENT ARTICLE 



VERSION 
V06A-02 



VERSION 
N/A 



SEQUENCE 
3.4.1 



PAGE 
2 0^2 



ORIGINAL DATE 
December 1975 
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Manipulation of Virtual Strings Containing Null Bytes 



PROBLEM: 

Manipulation of virtual strings containing null bytes may produce 
unexpected results. In particular, 

A$(l) = CVT%$(512%) 
B$ = A$(l) 
Where A$(l) is a virtual string causes B$ to have a length of 1. 

SOLUTION: 

Virtual strings are stored in their correct length slots and 

filled out with zero bytes. When a virtual string is retrieved, 

the length is determined by examining the bytes from the end of the 

slot toward the beginning of the slot. The first nonzero byte 

is assumed to be the end of the active data in the string. CVT%$ (512%) 

generates a string whose second byte is zero and when B$ is assigned 

its value, the active data in A$(l) is computed to consist of one 

byte. 

It should be noted that the virtual string facility is intended for 
use as a storage mechanism for meaningful character data. 

NOTE: CVT$%(B$) will still be equal to 512% since CVT$%( ) and CVT$F ( ) pad 
short strings with nulls. 



SOFTWARE PRODUCT 
RSTS/E BASIC-PLUS 



COy°ONEMT 

Virtual Core 



>/i^RG!OK 

V06A-02 



VERSION 



SUBPROGRAM OR ADOIT^ON'sl INFORMATION 

Virtual Strings 



NEW 

CD 



REPL-ACeMENT ARTICLE 

rri 



SECUt'v'" = i f'AGf j 

3.8.1 I 1 -^^ M 



ORIGINAL DATE 

Pre-1973 
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Possibility of Zeroing An Account 



PROBLEM: 



When using BACKUP to transfer from disk to magtape, it is possible 
to zero out an account on the disk by issuing a command as follows: 

#MT0<[200,*]/Z/L 



SOLUTION: 

This problem is too complex to patch. The problem will be fixed in 
the next release of BACKUP following the V06A-02 release. 
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SOFTWARE PRODUCT 
RSTS/E Utilities 


VERSION 
V06A-02 


COMPONENT 
BACKUP 


VERSION 


SUBPROGRAM OR ADDITIONAL INFORMATION 


SEQUENCE 
4.2.1 


PAGE 
1 OF 1 


NEW REPLACEMENT ARTICLE 


ORIGINAL DATE 


CZ 







SOFTWARE DISBMCH 


RSTS/E 


June 1975 



Backing Up RP03 or RP04 



PROBLEM: 



$BACKUP takes an unusually long time to back up large (RP03 and 
RP04) disk packs. 



SOLUTION: 

A new BACKUP package is currently under development. It will not be 

a part of the RSTS/E V06A-02 release but a separate package. Notification 

of availability will appear in the Software Dispatch. 

Until then, follow these suggestions: 

1. Do BACKUPS stand-alone, if possible. 

2. Keep accounts as clean as possible (delete .TMP files, zero 
unused accounts, etc.) 

3. Upgrade to RSTS/E V!2(6A-02 when it becomes available, and use the 
REORDR program regularly to reorder accounts. Use the extended 
PIP in V06A-02 to back up, zero, and restore the accounts. 

These procedures will help to keep the directories neat. 



SOFTWARE PRODUCT 
RSTS/E Utilities 


VERSION 
V06A-02 


COMPONENT 
BACKUP 


VERSION 


SUBPROGRAM OR ADDITIONAL INFORMATION 


SEQUENCE 
4.2.2 


PAGE 
1 OF 1 


NEW REPLACEMENT ARTICLE 

cn 


ORIGINAL DATE 
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Backup Public-To-Pu.blic Disk Transfers 



Several BACKUP SPRs have been received indicating a 
problem when attempting to transfer files from one public 
disk to another public disk. BACKUP does not support this 
operation . 

In general , unless the documentation states that an 

operation is valid, then it is not valid and hence 

unsupported. In the case of BACKUP, the User Manual makes 

no reference to public- to-public transfers. 

The purpose of BACKUP is to preserve on-line files 
off-line and then to restore these files in the event that 
the on-line copy is destroyed. BACKUP was not designed to 
handle file tranfers within the public structure. 



SOFTWARE PRODUCT 
RSTS/E Utilities 


VERSION 
V06A-02 


COMPONENT 

BACKUP 


VERSION 

N/A 


SUBPROGRAM OR ADDITIONAL INFORMATION 


SEQUENCE 
4.2.3 


PAGE 
1 OF 1 


NEW REPLACEMENT ARTICLE 

[Z3 □ 


ORIGINAL DATE 

January 1976 
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BACKUP Clusters ize Errors 



PROBLEM: 

A system BACKUP is in progress using 
BACKUP and BACKDK. At the end of the 
file from DB: will not fit on the tape, 
spaces the tape to the last filemark, 
closes the tape . 



the programs 

first t ape , a 

So, BACKUP 

and logically 



It then requests the operator to mount a new tape, and 
having done so, the operation continues. The file 
which would not fit the previous tape gets saved to 
this second tape. However, the clustersize for this 
file when restored to disk turns up as clustersize-2 . 



PREREQUISITES: 

The V06A-02 version of BACKUP or BACKDK, 



PROCEDURE: 



Log into the system under the account [1,2], the 
system library account. 



Mount the system library source medium on a 
unit and bring the drive to a READY state. 

Copy of DEC-1 1-ORSLA-C-HA disk (RK) 
DEC-n -0RSCA-D-UA3 Large Programs DECtape 
DEC-n-0RSLA-D-MA7 magtape (7-track) 
DEC-1 1-0RSLA-D-MA9 magtape (9-track) 



free 



SOFTWARE PRODUCT 

RSTS/E UTILITIES 


VERSION 

V06A-02 


COMPONENT 
BACKUP & BACKDK 


VERSION 
N/A 


SUBPROGRAM OR ADDITIONAL INFORMATION 

BACKUP Patches 


SEQUENCE 

4.2.4* 


PAGE 

^OF 3 


NEW REPLACEMENT ARTICLE 


ORIGINAL DATE 
February 1976 
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BACKUP Clusters ize Errors 



2A. (RK distribution only) 

Mount the copy of the System library using the 
UTILITY program and label SYSLIB. 



Bring the BACKDK source program into memory with 
the command : 

OLD XX:BACKDK XX=DTn for DECtape 

=MTn for magtape, and 
=DKn for disk cartridge. 



READY 

SOLUTION: 

Modify line 12000 of program BACKDK. BAS as follows: 

1. Remove statement: 

2. Modify CHR$(F8it) to read CHR$( F8i- 1 $ ) . 



SOFTWARE PRODUCT 
RSTS/E UTILITIES 



COMPONENT 
BACKUP & BACKDK 



SUBPROGRAM OR ADDITIONAL INFORMATION 

BACKUP Patches 



NEW 



REPLACEMENT ARTICLE 



CD 



VERSION 

V06A-02 



VERSION 
N/A 



SEQUENCE 
4.2.4* 



PAGE 
2 3F 3 



ORIGINAL DATE 
February 1976 
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Backup Clustersize Errors 



Line 12000 should now read 

BACKDK 09:29 AM 21-Nov-75 

12000 3$="": S$ = S$ + CHR$(F$(I5{)) FOR I$ = 7* TO ^2%: S$ = S$ + CHR$ ( N5$ ) + 
CHR$(N6J)+CHR$(F4 5t) + CHR$(F8it-U) + CVTit$(SWAPX(F6il)) + CVT5t$(F3l) 
FIELD «2%, B2i AS 0$: LSET 0$ = S$: PUT #236, COUNT 14$: RETURN 
! CREATE AND PUT MAGTAPE FILE HEADER 



Recompile the program onto the system library with the 
c ommand : 

COMPILE SYOrBACKDK 

If the source (.BAS) file is to be saved also, type 
the command: 

REPLACE dev:BACKDK(account) 

NOTE: Do not replace BACKDK. BAS on the original 
distribution medium. 

BACKDK subsequently executes properly. 



SOFTWARE PRODUCT 

RSTS/E UTILITIES 


VERSION 

V06A-02 


COMPONENT 
BACKUP S BACKDK 


VERSION 
N/A 


SUBPROGRAM OR ADDITIONAL INFORMATION 

BACKUP Patches 


SEQUENCE 

4.2.4* 


PAGE 
3 OF 3 


NEW REPLACEMENT ARTICLE 

nn =1 


ORIGINAL DATE 

February 1976 
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Retaining Original Creation Dates with BACKUP 



PROBLEM: 

When restoring files from magtape, BACKUP fails to 
retain the original file creation date. 



PREREQUISITES: 

The V06A-02 version of BACKUP or BACKDK. 

PROCEDURE: 

J. Log into the system under the account [1,2], the 
system library account. 

2. Mount the system library source medium on a free 
unit and bring the drive to a READY state. 

Copy of DEC-n-ORSLA-C-HA disk (RK) 
DEC-t 1-0RSCA-D-UA3 Large Programs DECtape 
DEC-n-0RSLA-D-MA7 magtape (7-track) 
DEC-11-0RSLA-D-MA9 magtape (9-track) 

2A. (RK distribution only) 

Mount the copy of the System library using the 
UTILITY program and label SYSLIB. 



SOFTWARE PRODUCT 

RSTS/E UTILITIES 


VERSION 
V06A-02 


COMPONENT 
BACKUP & BACKDK 


VERSION 
N/A 


SUBPROGRAM OR ADDITIONAL INFORMATION 

BACKUP Patches 


SEQUENCE 
4.2.5* 


PAGE 
1 OF 3 


NEW REPLACEMENT ARTICLE 


ORIGINAL DATE 
February 1976 
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Bring the BACKDK source program into memory with 
the c ommand : 

OLD XX:BACKDK XX=DTn for DECtape 

=MTn for magtape, and 
=DKn for disk cartridge. 



READY 



Solution : 

On line 20105 change the last two unequals (<>) to 
equals ( = ) . 

Line 20105 should now read. 



BACKDK 09:30 AM 21-Hov-75 

20105 It=MAGXAPE(2t,A0>,2«) IF G3I AND 1J: 

X*=FNDJ(1J) UNLESS S7J OR OU AND -2t: 

IFG3>s1JANDG1>AND5JANDB*<>AOjANDS7J=AOtANDVj=AOJANDAt=A0»THEN Xt=FNDt(2j; 

! RESET FILE ACCESS STATISTICS IF NECESSARY 



SOFTWARE PRODUCT 

RSTS/E UTILITIES 



COMPONENT 
BACKUP & BACKDK 



SUBPROGRAM OR ADDITIONAL INFORMATION 
BACKUP Patches 



NEW 



REPLACE MENT ARTICLE 

CD 



VERSION 

V06A-02 



VERSION 
N/A 



SEQUENCE 

4.2.5* 



PAGE 
2°^ 3 



ORIGINAL DATE 
February 1976 
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Retaining Original Creation Dates with BACKUP 



Recompile the program onto the system library with the 
command : 

COMPILE SYO:BACKDK 

If the source (.BAS) file is to be saved also, type 
the command : 

REPLACE dev:BACKDK(account) 

NOTE: Do not replace BACKDK.BAS on the original 
distribution medium. 

BACKDK subsequently executes properly. 



SOFTWARE PRODUCT 

RSTS/E UTILITIES 


VERSION 
V06A-02 


COMPONENT 

BACKUP & BACKDK 


VERSION 

N/A 


SUBPROGRAM OR ADDITIONAL INFORMATION 
BACKUP Patches 


SEQUENCE 

4.2.5* 


PAGE 
3 0^3 


NEW REPLACEMENT ARTICLE 

\Z2 CD 


ORIGINAL DATE 
February 1976 
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BACKUP Fails to Retain Protection Code 



PROBLEM: 



While running under a privileged account, tl,x] 

BACKUP fails to retain a protection code of <64>. 



PREREQUISITES: 

The V06A-02 version of BACKUP or BACKDK. 

PROCEDURE: 

1. Log into the system under the account [J, 2], the 
system library account. 

2. Mount the system library source medium on a free 
unit and bring the drive to a READY state. 

Copy of DEC-1 l-ORSLA-C-HA disk (RK) 
DEC-1 1-0RSCA-D-UA3 Large Programs DECtape 
DEC-1 1-0RSLA-D-MA7 magtape (7-track) 
DEC-1 1-0RSLA-D-MA9 magtape (9-track) 

2A. (RK distribution only) 

Mount the copy of the System library using the 
UTILITY program and label SYSLIB. 



SOFTWARE PRODUCT 

RSTS/E UTILITIES 


VERSION 
V06A-02 


COMPONENT 

BACKUP & BACKDK 


VERSION 
N/A 


SUBPROGRAM OR ADDITIONAL INFORMATION 
BACKUP Patches 


SEQUENCE 
4.2.6* 


PAGE 
1 0^3 


NEW REPLACEMENT ARTICLE 


ORIGINAL DATE 
February 1976 
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BACKUP Fails to Retain Protection Code 



3. Bring the BACKDK source program into memory with 
the command: 

OLD XXrBACKDK XX=DTn for DECtape 

=MTn for magtape, and 
=DKn for disk cartridge. 



READY 

SOLUTION: 

On line 1910 change modifier 



to 



F4$>63$ 



Line 1910 should then read: 

BACKDK 09:30 AM 21-Nov-75 

1910 ONERRORGOT020000:GOSUB12000IFG3JAND4J 

Rl$ = A0i6:GOTO3200IFVit: 
IF(Gl%AND5%)*(G3*ANDn)THEN 
NAMEA$+S9$ + N$ASN$IFF4:l>63$ANDS7it = A05t: 
PUT#2i6,REC0RDF3i6,C0[JNT512it: 
OPEN A$+S9$ + N$ ASF ILE2St, RECORDS I ZEB2 5t 
!WRITEMAGTAPELABEL;CHECKDISK-TO-DISK 



SOFTWARE PRODUCT 

RSTS/E UTILITIES 


VERSION 

V06A-02 


COMPONENT 

BACKUP & BACKDK 


VERSION 
N/A 


SUBPROGRAM OR ADDITIONAL INFORMATION 

BACKUP Patches 


SEQUENCE 
4.2.6* 


PAGE 
2 OF3 


NEW REPLACEMENT ARTICLE 

CD 


ORIGINAL DATE 

February 1976 
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BACKUP Fails to Retain Protection Code 



Reconiplle the program onto the system library with the 
command : 

COMPILE SYO:BACKDK 

If the source (.BAS) file is to be saved also, type 
the command : 

REPLACE dev :BACKDK(account) 

NOTE: Do not replace BACKDK.BAS on the original 
distribution medium. 

BACKDK subsequently executes properly. 



SOFTWARE PRODUCT 

RSTS/E UTILITIES 


VERSION 
V06A-02 


COMPONENT 

BACKUP & BACKDK 


VERSION 

N/A 


SUBPROGRAM OR ADDITIONAL INFORMATION 

BACKUP Patches 


SEQUENCE 

4.2.6* 


PAGE 
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NEW REPLACEMENT ARTICLE 
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BACKUP Detach Problem 



PROBLEM: 



When running BACKUP to magtape, detached and using the 
/Z switch, there is a problem when a second tape is 
involved. After asking for the second tape to be 
mounted, BACKUP detaches and immediately goes into 
hibernate state. When you attach to the job it prints 
"REALLY ZERO MTO:?" Once you answer YES, it again 
detaches. The BACKUP (or BACKDK) program should first 
ask the question about zeroing the magtape and then 
detach . 



PREREQUISITES: 

The V06A-02 version of BACKUP or BACKDK, 



PROCEDURE: 

\. Log into the system under the account [1,2], the 
system library account. 

2. Mount the system library source medium on a free 
unit and bring the drive to a READY state. 

Copy of DEC-1 1-ORSLA-C-HA disk (RK) 
DEC-1 1-0RSCA-D-UA3 Large Programs DECtape 
DEC-1 1-0RSLA-D-MA7 magtape (7-track) 
DEC-11-0RSLA-D-MA9 magtape (9-track) 



SOFTWARE PRODUCT 
RSTS/E UTILITIES 


VERSION 

V06A-02 


COMPONENT 

BACKUP & BACKDK 


VERSION 
N/A 


SUBPROGRAM OR ADDITIONAL INFORMATION 

BACKUP Patches 


SEQUENCE 
4.2.7* 


PAGE 

lO'^a 


NEW REPLACEMENT ARTICLE 


ORIGINAL DATE | 


ca 1= 


Februe 


iry 1976 
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BACKUP Detach Problem 



2A. (RK distribution only) 



Mount the copy of the System library using the 
UTILITY program and label SYSLIB, 



Bring the BACKDK source program into memory with 
the command: 

OLD XX:BACKDK XX=DTn for DECtape 

=MTn for magtape, and 
=DKn for disk cartridge. 



READY 

SOLUTION: 

On line 21010 remove the statement which reads 

GOSUB 28600 
Line 21010 should then read: 



BACKDK 09:30 AH 21-NOV-75 

21010 Z%=-\% :GOSUfl 28000 : 

INPUT "NEXT MAGTAPE UNIT f;Zi WHILE ZJ<AOJOR ZJ>7J 
S9$:"MT" + CHR$(it8J + Z>) + ":": Wf:(Wj AND -5%) OR It* : 
GOTO 750 



SOFTWARE PRODUCT 
RSTS/E UTILITIES 


VERSION 
V06A-02 


COMPONENT 

BACKUP & BACKDK 


VERSION 

N/A 


SUBPROGRAM OR ADDITIONAL INFORMATION 
BACKUP Patches 


SEQUENCE 
4.2.7* 


PAGE 
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NEW REPLACEMENT ARTICLE 
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BACKUP Detach Problem 



Recompile the program onto the system library with the 
command : 

COMPILE SYO:BACKDK 

xi tne source \»BA<SJ iXxe is uo we ssveu aj.sCy type 
the command: 

REPLACE dev :BACKDK(account) 

NOTE: Do not replace BACKDK.BAS on the original 
distribution medium. 

BACKDK subsequently executes properly. 



SOFTWARE PRODUCT 
RSTS/E UTILITIES 


VERSION 
V06A-02 


COMPONENT 

BACKUP & BACKDK 


VERSION 
N/A 


SUBPROGRAM OR ADDITIONAL INFORMATION 

BACKUP Patches 


SEQUENCE 
4.2.7* 


PAGE 
3 OF 3 


NEW REPLACEMENT ARTICLE 


ORIGINAL DATE 
February 1976 
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BATCH Does Not Work with Decimal Arithmetic (SPR 11-5782) 



PROBLEM: 

BATCH will not work correctly with the Decimal Arithmetic BASIC- 
PLUS math package developed as part of the RSTS/E Commercial 
Extensions. 



SOLUTION : 

All references to 

l,Eli2l 
in BATCH should be replaced by 

10 000 000 000 
if Decimal Arithmetic is being used. 



SOFTWARE PRODUCT 
RSTS/E Utilities 


VERSION 
V06A-01 


COMPONENT 
BATCH, BATDCD 


VERSION 


SUBPROGRAM OR ADDITIONAL INFORMATION 


SEQUENCE 
4.3.1 


PAGE 
1 OF 1 


NEW REPLACEMENT ARTICLE 
X 


ORIGINAL DATE 
December 1975 
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CREF Goes Into an Infinite Loop 



PROBLEM: 



If„ the variable ERL appears at the end of a BASIC PLUS line, 
CREF goes into an infinite loop. 



SOLUTION : 

The following patch fixes the problem. 

PREREQUISITES : 
None. 

PROCEDURE : 

1. Log into the system under the account [1,2], the system 
library account. 

2. Mount the system library source medium On a free unit and 
bring the drive to a READY state. 

Copy of DEC-1 1-ORSLA-C-HA disk (RK) 
DEC-1 1-0RSCA-D-UA3 Large Programs DECtape 
DEC-n-0RSLA-D-MA7 magtape (7-track) 
DEC-1 1-0HSLA-D-.MA9 magtape (9-tracic) 

2A. (RK distribution only) 

Mount the copy of the System library using the UTILITY 
program and label SYSLIB. 



SOFTWARE PRODUCT 
RSTS/E Utilities 


VERSION 
V06A-02 


COMPONENT 

CREF 


VERSION 

N/A 


SUBPROGRAM OR ADDITIONAL INFORMATION 


SEQUENCE 
4.6,1* 


PAGE 
lO"^ 2 


NEW REPLACEMENT ARTICLE 

CZ3 ZD 


ORIGINAL DATE 

January 1976 
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CREF Goes Into an Infinite Loop Page 2 of 2 



3. Bring the CREF source program into memory with the command 

OLD XX:CREF XX=DTn for DECtape 

=MTn for magtape, and 
=DKn for disk cartridge. 



READY 



Type the following lines; 



320 P$=PJ+LEN(E$(J?))-1$ : IF J%>5% OR M? THEN 260 
ELSE IF J?:5? 

THEN ?%-?%+}% WHILE INSTR ( 1 ?,"<>=", MID( Z$ , P? , I? ) ) AND 
(P$<=LEN(Z$) ) 



Recompile the program onto the system library with the command: 

COMPILE SyO:CREF<40> 

If the source (.BAS) file is to be saved also, type the 
command : 

REPLACE dev :CREF( account) 

NOTE: Do not replace CREF. BAS on the original distribution 
medium . 

CREF subsequently executes properly. 
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Using Wildcard Commands with DIRECT 



PROBLEM: 

There is a problem with the version of DIRECT released 
with RSTS/E V06A-02. When calling for a directory 
with a wildcard specification, on a system using 
multiple system/public disks, some accounts are 
reported inaccurately. In certain cases, files from 
the last device of the last account listed will be 
printed along with any files that actually belong to 
the account. 



SOLUTION: 

The following modification corrects this problem. 

PREREQUISITES: 

The version of DIRECT that was released with RSTS/E 
V06A-02. 

PROCEDURE: 






f ho 



system library account 



SOFTWARE PRODUCT 

RSTS/E UTILITIES 


VERSION 
V06A-02 


COMPONENT 

DIRECT 


VERSION 
N/A 


SUBPROGRAM OR ADDITIONAL INFORMATION 


SEQUENCE 
4.7.1* 


PAGE 
lOF 3 


NEW REPLACEMENT ARTICLE 


ORIGINAL DATE | 


q: Z3 


Februa 


ry 1976 
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Using Wildcard Commands with DIRECT 



2. iMount the system library source mediuTn on a free 
unit and bring the drive to a READY state. 

Copy of DEC-n-ORSLA-C-HA disk (RK) 
DEC-1 1-0RSCA-D-UA3 Large Programs DECtape 
DEC-1 1-0RSLA-D-MA7 magtape (7-track) 
DEC-n-0RSLA-D-MA9 magtape (9-track) 

2A. (RK distribution only) 

Mount the copy of the System library using the 
UTILITY program and label SYSLIB. 



Bring the DIRECT source program into memory with 
the command : 

OLD XXrDIRECT XX=DTn for DECtape 

=MTn for magtape, and 
=DKn for disk cartridge. 



READY 



SOFTWARE PRODUCT 
RSTS/E UTILITIES 


VERSION 
V06A-02 


COMPONENT 

DIRECT 


VERSION 
N/A 


SUBPROGRAM OR ADDITIONAL INFORMATION 


SEQUENCE 

4.7.1* 


PAGE 
2 OP 3 


NEW REPLACEMENT ARTICLE 

q: =1 


ORIGINAL DATE 
February 1976 
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Using Wildcard Coinmands with DIRECT 



Type the following lines: 



1!!!! DIRECT VERSION 06A EDIT 2 10/31/75 

2J00 OPEN D$+U$ FOR INPUT AS FILE \% 

:GOTO 2080 UNLESS PEEK( PEEK( PEEK( PEEK( 520it ) ) +2 ? ) +1$ ) 

:FiS = U%(3U,0?) 

:B$,U$=0$ 

:G0T0 2270 IF S% AND 8192? 

!0PEN UFD, SKIP IF NULL, GET CLUSTER, INIT POINTER 

!SKIP IF BACKWARDS LIST 

Recompile onto the system library with the command: 

COMPILE SY0:DIRECT 

Name the program with a privileged protection with the 
command : 

NAME "DIRECT. BAC" AS "DIRECT . BAC<2 32> 

If the source (.BAS) file is to be saved also, type 
the command : 

REPLACE dev:DIRECT(account) 

MnTR"' nn n/^f r•Qr^^-^o»^ nTDI?r"r DAO «„ t-W» ~«j— j—^n 

distribution medium. 

DIRECT subsequently executes properly. 



SOFTWARE PRODUCT 

RSTS/E UTILITIES 


VERSION 
V06A-02 


COMPONENT 

DIRECT 


VERSION 

N/A 


SUBPROGRAM OR ADDITIONAL INFORMATION 


SEQUENCE 
4.7.1* 


PAGE 
3°^ 


NEW REPLACEMENT ARTICLE 


ORIGINAL DATE | 


oi en 


Februa 


ry 1976 
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RSTS/E 


April 1975 



Setting Terminal Speeds 

PROBLEM: 

The START. CTL file does not set terminal speeds correctly. 

SOLUTION: 

Multiple forces to KBjZ): should not be attempted by START. CTL or 
CRASH. CTL. All KB0: forces do not take effect until the END 
statement in the START. CTL or the CRASH. CTL file has been reached. 

To overcome this problem, any .CTL file should LOGIN and FORCE to 
a keyboard other than KB0: , except for the following statement: 

FORCE KB0:RUN $EKRCPY 

which should come directly before the END statement. See the 
following example. 



MOUNT DBlrSYSLIB- 
MOUNT DB2:SYSLIB 
LOGINS 



LOGIN KB1:[1,2] 

FORCE KBl : RUN $TTYSET ■ 

FORCE KB1:VT05B 

FORCE KB1:KB2: 

FORCE KB1:LA30S 



FORCE KBl: EXIT 

FORCE KBl: RUN $QUEMAN- 
FORCE KB1:\DE 



LOGIN KBl: [1,2] 

FORCE KB1:RUN$SP00L 
FORCE KBl : 



:> 



STANDARD MOUNT COMMANDS 

ENABLE LOGINS 

LOGIN ON NON-ZERO KEYBOARD 

GET TTYSET 

INCREASE SPEED OF FORCED KB: 



SET ALL OTHER KEYBOARDS 
START QUE MANAGER 

START SPOOLER (S) 



SOFTWARE PRODUCT 
RSTS/E Utilities 


VERSION 
V06A-02 


COMPONENT 
INIT 


VERSION 


SUBPROGRAM OR ADDITIONAL INFORMATION 
START. CTL 


SEQUENCE 
4.16.1 


PAGE 
1 OF 2 


NEW REPLACEMENT ARTICLE 
X 


ORIGINAL DATE 
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April 1975 



Setting Terminal Speeds 



FORCE KB0:RUN $ERRCPY 
SEND XXXXXXXXXXXXXXX 
END 



- TAKES EFFECT AFTER INIT EXITS 
AND "...ON AIR" IS PRINTED 



SOFTWARE PRODUCT 

RSTS/E Utilities 


VERSION 
V06A-02 


COMPONENT 
INIT 


VERSION 


SUBPROGRAM OR ADDITIONAL INFORMATION 
START. CTL 


SEQUENCE 
4.16.1 


PAGE 
2 OF 2 


NEW REPLACEMENT ARTICLE 
X 


ORIGINAL DATE 
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RSTS/E 



September 1975 



Hanging $INIT (11-E4394) 



SUGGESTIONS : 



1. 



$INIT can hang if $QUEMAN and/or $SPOOL do not start correctly. 
Include a BYEF in the START. CTL after the start-up commands to QUEMAN 

clii(-( t_«j. i^vjj-i L-v-* cij, j_t: V j-d u^ any _jj'i.v_»ijj.t::iii. 



2. Start-up time may be reduced significantly by running $TTYSET 
from one terminal to set the characteristics for all others, 
rather than using a CCL command of SET on individual keyboards, 
necessitating a separate LOGIN and RUN. 

3. If a trailing blank is omitted in a command string such as 
FORCE KB3:, INIT may err; however, if instead the user specifies 
explicitly FORCE KB3:0, the start-up procedure is more failsafe. 



SOFTWARE PRODUCT 

RSTS/E UTILITIES 


VERSION 
V5C, V6A 


COMPONENT 

INIT 


VERSION 

N/A 


SUBPROGRAM OR ADDITIONAL INFORMATION 


SEQUENCE 

4.16.2 


PAGE 
1 0^1 


NEW REPLACEMENT ARTICLE 
X 


ORIGINAL DATE 
September 1975 
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RUN BURST NOT RESET IN LOGIN 



If a user logs in, runs $PRIOR to change the run burst and then logs 
in to another account, the run burst is not reset to the default 
value of 6. 

The following patch corrects the problem. 

1. Log into the system under the account [1,2], the 
system library account. 

2. Mount the system library source medium on a free unit 
and bring the drive to a READY state. 

Copy of DEC-ORSLA-C-HA disk (RK) 
DEC-l 1-0RSCA-D-UA3 Large Programs DECtape 
DEC-11-0RSLA-D-MA7 magtape (7-track) 
DEC-11-0RSLA-D-MA9 magtape (9-track) 

2a. (RK distribution only). 

Mount the copy of the System library using the UTILTY 
program and label SYSLIB. 

3. Bring the LOGIN source program into memory with the 
command: 

OLD XX : LOGIN. BAS xx=DTn for DECtape 

=MTn for magtape, and 
=DKn for disk cartridge 

READY 



RSTS/E UTILITIES V06A-02 Seq 4.20. 

LOGIN 1 of 2 



19? 



Type the following lines: 

15010 J%=8% 

: J^=16^ IF [k% AND -256iS)=256? 

: I$=SYS(CHR$(6?)+CHR$(-13?)+CHR$(-U) + 
CHR$(-U)+CHR$(-2:l) + 
CHRi(-l%)+CHR$( b%) + 
CHR$(-1*)+CHR$( J%)) 

: RETURN 



Recompile onto the system library with the command: 
COMPILE SYO: LOGIN 

If the source (.BAS) file is to be saved also, type the 
command: 

REPLACE dev:LOGIN (account) 

NOTE: Do not replace LOGIN. BAS on the original 
distribution medium. 

LOGIN subsequently operates properly. 



RSTS/E UTILITIES V06A-02 Seq 4 20 1* 

LOGIN 2 of 2 ■ 

July 1976 
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RSTS/E 


July 1973 



Copying .BAG Files to DECtape 



PROBLEM: 



Copying .BAC files to DECtape and back to disk again can make them 
nonrunnable. 



EXPLANATION : 

Disk file blocks contain 512 bytes, DECtape blocks only 510. For 
this reason, it is necessary to transfer BAC files as Contiguous 
files with the "CO" switches in PIP. This causes all bytes to be 
transferred as is to as many blocks as necessary. 

"/CO" will fill out the last block (usually an extra one) with NULLs 
{binary byte) . For this reason, it is necessary to copy back from 
DECtape to disk with the "/CO:T" which truncates the last block by 
deleting the excess NULL fill. 
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RSTS/E 


October 1973 



Copying a File into the Same Account with the Same Name 



PROBLEM: 

will cause the deletion of the file. 



SOLUTION : 

PIP, when transferring files, opens the output file first, then opens 
the input file. If not using the PIP update switch (/UP), PIP's 
OPEN "FILNAM.EXT" FOR OUTPUT causes the deletion of any existing 
file by that name and the re-creation of that file with an initial 
length of zero blocks. 
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Miscellaneous Problems 



PROBLEM: 



Throuf^h SPRs and Internal usage, the following, 
problems in the Extended PIP program have been brought 
to our attention: 

1. Though PIP can not handle wildcard accounts (or 
UlCs, using the /DOS switch) on disks, it does not 
issue an error message when a user attempts a PPN 
wildcard operation; 

2. The program issues a misleading error message when 
a command of the form 

*.<wildcard f i 1 e> = <non-f i 1 e-structured device) 

is entered, where <wildcard file> may be any 
wildcard file specification (e.g., "TEST", where 
the lack of a period indicates that the output 
extension is to be taken from the input file 
specification), and <non-f i 1 e-structured device> 
is just that (e.g., KB:, PR:, etc.); 

3. It is possible to create an output magtape file 
full of garbage records which fills the magtape 
when using the / FORMAT :V switch from a file that 
contains only one record; 

4. The /Dl and /DI:S commands report a clustersize of 
zero for disk files with clustersize of 25b. 



SOFTWARE PRODUCT 
RSTS/E UTILITIES 
COMPONENT 
PIP 



SUBPROGRAM OR ADDITIONAL INFORMATION 



NEW 



REPLACEMENT ARTICLE 



ED 



VERSION 

V06A-02 



VERSION 

V06A-17 



SEQUENCE 

4.25.3* 



PAGE 
OF 4 



ORIGINAL DATE 
January 1976 
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Miscellaneous Problems page 2 of 4 

3. When a CCL command of the form 

PIP Jf i 1 ename 

Is executed, the program often generates a 

UN I BUS TIMEOUT FATAL TRAP 

error when attemptin>^ to return to cor:inand mode. 
(All 0|)eratlons are successfully performed before 
the error Is generated.) 

SOLUTION : 

The problems are all fixed by the following 
modi f ications. 

PREREQUISITES : 

RSTS/E VJoA-U2, and the lar<^e PIP proj^ram, PIPEXT 
VJbA-17. 

PROCEDURE : 

1. Los into the system under the account (1,2), the 
system library account. 

I. Mount the system library source medium on a free 
unit and bring the drive to a READY state. 

Copy of DEC-11-ORSLA-C-HA disk (RK) 
L)EC-11-0RSCA-D-UA3 Lari^e Pro',rains DECtape 
DEC-11-0RSLA-D-HA7 magtape (7-track) 
DEC-11-0RSLA-D-MA9 map.tape ('J-track) 

2A. (RK distribution only) 

Mount the copy of the System library using the 
UTILITY pro^-iram and label SYSLIB. 
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Miscellaneous Problems page 3 of 4 



3. Bring the PIPEXT source program into memory with 
the command: 

OLD XX:PIPEXT XX=DTn for DECtape 

=i'1Tn for magtape, and 
=DKn for disk cartridge. 



READY 



Type the following lines 



111!! PIP VERSION 6A EDIT 18 11/03/75 
4015 GOTO t^200 IF (¥7.^(05) AND i:-i)=l?i AND 

(SWAP?i(CVT$^i(MID(r$,29^i,2;i))) AND 768'>)<>0^i 
i IF A '*' IN PROJ OR PROG FOR A DISK, ERROR. 

4200 E$ = CHR$(13i^)+CHR$(10/,)+"PPN WILDCARDS ARE ILLEGAL - " + 

FNU$(1$,-1<;) 
: E^=-32126i 
: GOTO 451*0 
! SET UP THE ERROR MESSAGE FOR ILLEGAL PPN FOR DISK. 

kkko E;i=-3iai4;i 

: E$ = CHR$(13:i)+CHR$(lU>j) + 

"OUTPUT FILE NAME NOT ABSOLUTE - "+ 

FNU$(OJ$,-l>o) 
: RETURN 

! IF OUT=(DT, MT, OR DSK) AND INPOCDT, MT, OR DSK) AND 
! INPUT(FILE, EXT, PROJ, OR PROG)=WlLD, THEN ERROR. 

6302 IF I5i AND kS'i THEN 

l2$ = "0000" + CVT$$(NUM$(l3>i + B3:^),-i:i) IF 15^^ = 32'^ 
: IF Bl/i-02.i<Il>.-l2^i+B3.i THEN 

IF 02:i = 0?i THEN bUlO 

ELSE 12 '■' = I2^''-I3 ' 
: FIELD *hi,oh AS 02$, 81^^-02:^ AS 02$ 
: LSET 02$ = STRING$(LEN(02$),9i4/i) : 01$, 02$ = "" 
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Miscellaneous Problems page 4 of 4 



oUlU E:i = E;> OR 128-i 

: E$="RECORD TOO LONG FOR OUTPUT RECORD" 
: RESUME 1310 



80 70 Il$=ll$ + FNP0$(13^,DATE$(Lim7;i) + 

smPZiLZilB-i)))) IF Ui AND 32;, 
: Il$ = Il$ + FNPU$(5:^j,CVT$$(NUH$(L|(27^) + 

SWAP;^^L%(28;^) AND i;^)),-!-^)) IF Ui AND bk^ 



100G5 CLOSE n 

! EXPLICITLY CLOSE OUT THE COMMAND FILE BEFORE OPENING 
! ANOTHER ONE. 



Recompile the program onto the system library with the 
command : 

COMPILE SYQiPIP 

Name the program with a privileged protection with the 
command: 

NAME "PIP.BAC" AS "P I P. BAC<232> 

if the source (.BAS) file is to be saved also, type 
the command: 

REPLACE dev:PIP(account) 

NOTE: Do not replace PIP. BAS on the original 
distribution medium. 

PIP subsequently executes properly. 
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FAILURE TO INITIALIZE QUEUE. SYS FILE - QUEMAN 



PROBLEM: 

The BASIC-PLUS system program prints the following messages when 
attempting to initialize the QUEUE. SYS file on a disk with a pack 
cluster size greater than 4. 

SUBSCRIPT OUT OF RANGE AT LINE 17650 
STOP AT LINE 20999 



SOLUTION : 

The patch below fixes the problem. 

PREREQUISITES: 

The system must have the large programs in the system library. 

PROCEDURE: 

1. Log into the system under account [1,2], the system library 
account. 

2. Mount one of the following system library source media on a 
free unit. 

Copy of DEC-11-ORSLA-C-HA disk (RK) 
DEC-11-0RSCA-D-UA3 Large Programs DECtape 
DEC-11-0RSLA-D-MA7 magtape (.7-track) 
DEC-11-0RSLA-D-MA9 magtape (.9-track) 

Make the unit ready. 

2A. (RK distribution only) 

Mount the copy of the system library disk using the UTILTY 
program and the label SYSLIB. 
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SOFTWARE PRODUCT 
RSTS/E UTILITIES 


VERSION 

V06A-02 


COMPONENT 
QUEMAN 


VERSION 
N/A 


SUBPROGRAM OR ADDITIONAL INFORMATION 


SEQUENCE 
4.29.1 


PAGE 

1°^2 


NEW REPLACEMENT ARTICLE 


ORIGINAL DATE 



SOFTWARE DISRMCH 


RSTS/E 


August 19 7 5 



Bring the QUEMAN source program into memory with the command 

OLD xx:QUEMAN where; 

READY 
Type the following lines: 



XX = DTn for DECtape, 
MTn for magtape , 
DKn for disk cartridge 



mn QUEMAN VERSION 5A EDIT 8 J85/23/75 
U OPEN "KB:" AS FILE 1% 

: J0$«SYS(CHR$(5U+CHR$(9?i)+CHR$(0%)) 

: PRINT "QUEMAN V^6A-08 - "+ 

MID(J0$,3"4,INSTR(3%/J0$.CHR$(0%))-2|) 

J^»ASCI l(J)8$)/2| 

J0$ = CVT$$("jS"+NUM$(J%),2U 

J0$=RIGHT(J0$/LEN(J0$)-1^) 

17650 OPEN "QUEUE. SYS$" FOR INPUT AS FILE 2% 

CHANGE SYS(CHR$(6^)+CHR$(-8?J+CHR$(2|)) TO M% 

C?i=MU13%) + l^ : Zl%=»M%(7?i) + SV;APS(M%(8^)) 

F^-(Z1%/C^)*C% 

IF F^,<>Z1^ THEN 

F?. = F?i + C^ WHILE Ffi<Zl| 
: PUT #2^, RECORD F?i 
: GOTO 17650 

17651 ??"'F/"'9^ 

21020 DEF FNr|(U) : I %» U-Z0U0%/1%)-1| 

: IF \%>P% THEN F?i«F^ + C^ WHILE \%>F% 
: Z$(F%)»"" : Z0%(0%,0^)=Z0%(0|,0%) 



Recompile the program onto the system library with, the command: 

COMPILE SYO:QUEMAN 

If the source (.BAS) form of QUEMAN Is to be saved also, type: 

REPLACE dev: QUEMAN [account] 
NOTE: do not replace QUEMAN, BAS on the original distribution medium. 



SOFTWARE PRODUCT 
RSTS/E UTILITIES 


VERSION 
V06A-0 2 


COMPONENT 
QUEMAN 


VERSION 
N/A 


SUBPROGRAM OR ADDITIONAL INFORMATION 


SEQUENCE 

4.29.1 


PAGE 

2°^ 2 


NEW REPLACEMENT ARTICLE 
X 


ORIGINAL DATE 
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QUEUING FROM MAGTAPE 



PROBLEM: After queuing files on Magtape to a line printer, the tape drive 
occasionally winds up assigned to QUEMAN. 

PREREQUISITES: V06A-02 of QUEMAN, 

DISPOSITIC*!: The following patch corrects the problem. 

1- Log into the system under the account [ 1 , 2 1 , the system library account. 

2. Mount the systan library source medium on a free unit and bring the drive 
to a READY state. 

Copy of DEC-11-ORSLA-C-HA disk (RK) 
DEC-11-0RSCA-D-UA3 Large Programs DECtape 
DEC-11-0RSLA-D-MA7 magtape (7-track) 
DBC-11-0RSLA-D-MA9 magtape (9-track) 

2A. (RK distribution only. ) 

Mount the copy of the System library using the UTILTY program and label 
SYSLIB. 

3. Bring the QUEMAN source program into memory with the catmand: 

OLD XX : QUEMAN xx=Drn for DECtape 

=Nfrn for magtape, and 
=DKn for disk cartridge 

Ready 

Type the following lines: 

5410 IF 0%(Z3%,5%)>0%(Z3%,7%) THEN GOSUB 5700 : J$ ( J% , 0%) =CHR$ (2%) 

: S0%=0% : GOTO 5440 

: IF IT'S EOJ BUILD AN ENDJOB. 
5700 IF SOI AND 24576% THEN M%(1%)=6% : M%(2%)=11% : CHANGE M% TO M$ 

M$=SYS(M$) : M%(2%)=6% 

: DEASSIGN AN ASSIGNABLE DEVICE. 



Reccmpile the program onto the system library with the coimand: 
COMPILE SYO: QUEMAN 



RSTS/E UTILITIES V06A-02 Sea 4 29 2* 

QUEMAN 1 of 2 " 
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QUEUING FROM MAGTAPE 

If the source (OUEMAN.BAS) is to be saved also, type: 

REPLACE dev:QUEMAN accoimt 
NOTE : Do not replace QOEMRN.BAS on the original distribution mediun. 



RSTS/E UTILITIES V06A-02 
QUEMAN 



Seq 4.29.2* 
2 of 2 
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UNDERLINING TEXT WITH RUNOFF 



PROBLEM: Under certain circumstances, RUNOFF incorrectly 
underlines text strings which have been centered. 



DISPOSITION: The following patch corrects the problem. 



1.';;: runoff version 6A edit 12 04-MAR-76 
10 PRINT "runoff V06A-12" 
5310 GOSUB 22000 \ L$="" \ 

N9%=N9%+W9% IF Z9% OR INSTR (C9% , 1$ , "+" ) OR INSTR(C9% , 1$ , "-" ) 

GOSUB 20000 \ L$=CVT$$(FNO$(I$,0%) ,128%) \ 

I%=(N9%-LEN(L$))/2% \ L$=SPACE$ (1%) +L$ \ 

GOTO 5210 UNLESS D%(0%) 



RSTS/E UTILITIES V06A-02 Seq 4.35,1* 

RUNOFF 1 of 1 



.'0 7 
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PROBLEMS WITH RUNOFF 



PROBLEM: The RUNOFF program has problems concerning enable/disable 
flags command, underlining and footnotes, and commands following a 
. PAGE command . 

DISPOSITION: The following patch corrects the problem. 
PROCEDURE: Type the following lines: 

i:::: runoff version 6a edit 12 04-mar-76 

10 print "runoff V06A-12" 
5110 GOSUB 22000 \ 

N9%=1% if Z9% \ IF N9%<1% GOTO 8920 ELSE 

GOSUB 23000 IF L0%<0%\ 

IF L0%<N9%+2% GOTO 6810 ELSE 

PRINT #F2% FOR I%=1% TO N9% \ L0%=L0%-N9% \ GOTO 1000 
5310 GOSUB 22000 \ L$="" \ 

N9%=N9%+W9% IF Z9% OR INSTR (C9% ,1$ , "+") OR INSTR(C9% ,1$ , "-")\ 

GOSUB 20000 \ L$=CVT$$(FNO$ (I$,0%) ,128%)\ 

I%= (N9%-LEN(L$) )/2% \ L$=SPACE$ {I%)+L$ \ 

GOTO 5210 UNLESS D%(0%) 
5710 IF Z9% GOTO 8920 ELSE IF Fl%=3% GOTO 8940 ELSE 

N%=N9%*S9%\ GOSUB 23000 IF L0%<=N%\ L0%=L0%-N% \ 

U1%=U9% UNLESS V9% \ V9%=V9%+N% \ X%=0%\ 

OPEN F8$ AS FILE 3%, MODE 2% 
5720 GOSUB 20000 \ IF ASCII (!$)<> F% (2%) THEN 

PRINT #3%, 1$ \ X%=X%+1% \ GOTO 5720 IF X%<=N%+60% \ 

PRINT 'Page'ABS(P9%) ", Missing Footnote Terminator O" 
6310 GOTO 8920 IF FNC9%\ 

FOR X%=B% TO E% \ 

F9%(X%)=F%(X%) IFF%(X%)\ F%(X%)=0%\ 

NEXT X% \ GOTO 5680 
7110 GOSUB 22000\ 

N9%=1% IF Z9%\ 

GOSUB 23000 IF L0%<0% \ 

IF L0%<(N9%+2%)*S9% GOTO 6810 
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QUEMAN FAILS TO RESPOND TO SHUTUP'S SECOND QUEMAN MESSAGE 

PROBLEM: SHUTUP will not operate properly if QUEMAN fails to re- 
spond to SHUTUP 's second QUEMAN message. 

DISPOSITION: The following patch will correct the problem. 

PREREQUISITE: The V06A-02 version of SHUTUP. SPL. 



1. Log into the system under the account [1,2], the system library 
account. 

2. Mount the system library source medium on a free unit and bring 
the drive to a READY state. 

Copy of DEC-11-ORSLA-C-HA disk (RK) 
DEC-11-0RSCA-D-UA3 Large Programs DECtape 
DEC-11-0RSLA-D-MA7 magtape (7-track) 
DEC-11~0RSLA-D-MA9 magtape (9-track) 

2A. (RK distribution only) 

Mount the copy of the System library using the UTILITY program 
and label SYSLIB. 

3. Bring the SHUTUP source program into memory with the command: 

OLD XX : SHUTUP. SPL xx=DTn for DECtape 

=MTn for magtape , and 
=DKn for disk cartridge 



Type the following lines: 

:!.!!!! SHUTUF' yi::RSI(:)N6 EDIT 2 30 -MAR -7 A 

8600 ON ERROR GOTO SA40 : ZZ=--:IZ t M$ = SYS(ZO$) 

! INIT SE:ND counter.- PUT YOURSELF INTO RECEIVE TABLES, 
S 6 1 ON E R R' R G T 8 6 5 ; M Hi ■- S Y S ( Z .1. $ + C H R it ( :l. % ) •)■ C H R $ < :l. S Z ) ) : M $ 

"SECOND QUEHAN MESSAGE SENT" 5 PRINT H$ 

! SEND THE SECONB QUEMAN MESSAGE. 
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quem;.n fails to respond to shutup's second queman message 

Recompile onto the system library with the command: 
COMPILE SYOiSHUTUP 

If the source (.SPL) file is to be saved also, type the command: 

replace dev:SHUTUP (account) 
NOTE: Do not replace SHUTUP.SPL on the original distribution medium. 
SIIUTUP subsequently operates properly. 
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User Account Protection 



PROBLEM: 



oYSTAT does not protect against writing across account 
by non-privileged users. The program also allows 
non-privileged users to use the /SL:n switch, causing 
iYSTAT to UETACH. 



SOLUTION: 

The following modifications correct these problems, 

PREREQUISITES : 

None. 
PROCEDURE: 



1. 



I, 



Log into the system under the account {1,1), the 
system library account. 



Mount the system library source medium on a 
unit and bring the drive to a READY state. 

Copy of UEC-11-0R3LA-C-HA disl< (RK) 
DEC-11-0RSCA-D-UA3 Large Programs DECtape 
UEC-H-0RSLA-U-MA7 magtape (/-track) 
DEC-11-0RSLA-D-MA9 magtape (a-tracl<) 



free 



SOFTWARE PRODUCT 

RSTS/E UTILITIES 


VERSION 
V06A-02 


COMPONENT 

SYSTAT 


VERSION 
V06A-04 


SUBPROGRAM OR ADDITIONAL INFORMATION 


SEQUENCE 
4.39.1* 


PAGE 
1OF3 


NEW REPLACEMENT ARTICLE 


ORIGINAL DATE 
January 1976 
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User Account Protection page 2 of 3 



lA. (KK distribution only) 

Mount the copy of the System library usinr, the 
UTILITY program and label SYSLIB. 



3. Bring the SYSTAT source program into memory with 
the command: 

ULD XX:SYSTAT XX=UTn for DECtape 

=fiTn for magtape, and 
=DKn for disk cartridge. 



READY 



Type the following lines: 



1!!!! SYSTAT VERSION bA EDIT 4 111/15/75 

350 A.i = PEEK(PEEK(DZa.J+2u,i) 

: IF (A% AND -236/J<>25b-, THEN 

PRINT "CAN'T UETACfl - FATAL" 

: s 1 .b = u ;;, 

: GOTU 120J 

1 DON'T LET HIM DETACH UNLESS HE'S PRIV'D. 

lOQI A., = PEEK(PEEK(520o)+2b:,) 

: IF (M<,(5:,) OR M:j(6.j))<>Ui THEN 

IF A^<>(M,(5:j+Si^AP;i(M'^(o:,))) AND 
(A., AND -25u:,)<>25o.i THEN 
PRINT "ILLEGAL OUTPUT - FATAL" 
: GOTO 1200 

10J3 ! CHECK TO PREVENT NON-PRIV'D USERS FROM iJRiTING 
1 TO A FOREIGN ACCOUNT. 
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User Account Protection page 3 of 3 



Recompile the projiram onto the system library with the 
command : 

COMPILE SYJiSYSTAT 



Name SYSTAT with the privileged protection with the 
command : 

iJAME "SYSTAT. BAG" AS "SYSTAT . liAC<232>" 



if the source (.BAS) file is to be saved also, type 
the command: 

REPLACE dev:SYSTAT(accoant) 

UQTE: Do not replace SYSTAT. BAS on the ori,<5inal 
distribution medium. 

SYSTAT subsequently executes properly. 
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TTYSET Handling of a VT50H 



PROBLEM: 



Direct cursor address mode on a VT50H fails in the X direction 
over X position 64. 



DISPOSITION: 

Run $TTYSET to SET LC OUTPUT. 



SOFTV/ARE PRODUCT 
RSTS/E UTILITIES 


VERSION 
VOGA-01 


COMPONENT 
TTYSET 


VERSION 
N/A 


SUBPROGRAM OR ADDI fiONAL INFORMAriON 


SEQUENCE 
4.42.1 


PAGE 

1 0^1 




NEW REPLACEMENT ARTICLE 


ORIGINAL DATE | 




13 (LI 


April 


L 1976 
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INCORRECT ORDER NUMBER FOR A DISK CARTRIDGE (GC) 



PROBLEM: An incorrect order number for a disk cartridge is given 
on page 4-55 of the RSTS/E System Generation Manual Update No.l (DEC- 
11-ORGNA-A-DNl) . 



DISPOSITION: The order number for the RSTS/E FORTRAN IV VOIC disk 
cartridge is given incorrectly as DEC-11-LFRSA-A-HB. The correct 
order nvimber is DEC-11-LRFSA-A-HB. A corrected page for the manual 
is provided. Remove page 4-55, 4-56 from the manual and replace it 
with the corrected version. 
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Building System Library Files 

Disk Cartridge Procedures 

To prevent possible accidental destruction of 
the distribution cartridge, it is advisable to 
make a copy of the cartridge and use the copy 
to install the system. The stand-alone program 
ROLLIN, which is included in the RSTS/E system 
generation disk cartridges, and may have been 
included in the RSTS/E system, can be used to 
make a copy of the cartridge. Refer to Section 
2.3 for more information on copying disks. 

Mount the copy of the distribution cartridge 
(labelled RSTS/E FORTRAN IV VOIC, order number 
DEC-11-LRFSA-A-HB ) on a free drive. 

Set the LOAD/RUN switch on the drive to its 
RUN position and ensure that the READY light 
comes on. 

Ensure that the WR PROT indicator is off (i.e., 
that the drive is write-enabled) . 

While logged into the system under account [1,2] , 
mount the disk cartridge by typing the following 
commands . 

RUN $UTILTY 

SYSTEM UTILITY PROGRAM 'UTILTY V06A-05 ' 

?_MOUNT DK0:?ORTRA 

1_EXIT 

where DKO: may be replaced by DKn:, n specifying 
the unit on which the distribution cartridge is 
located. When the system responds with the READY 
message, run the BUILD program from the system 
disk as follows. 

RUN $BUILD 

The program prints the following two lines. 

SYSTEM BUILDER 
SYSTEM BUILD? NO 

Type NO in response to the SYSTEM BUILD question. 
BUILD continues with the following questions. 

AUXILIARY BUILD DEVICE? FORTRA 
CONTROL FILE IS? UTLLNG .CTLC128 ^128] 

Type FORTRA as the logical device name, then type 
UTLLNG,CTL[128,128] to specify the correct control 
file. BUILD begins executing the commands in the 
file UTLLNG.CTL. Refer to Figure 4-1 for a sample 
printout of the procedure. 

Completion of the procedure is signalled by the 
BUILD COMPLETE message. Proceed to Section 4.7.1 
to continue with the FORTRAN installation. 
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Building System Library Files 

c. DECtape Procedures 

Mount the DECtape reels labelled RSTS/E FORTRAN 
IV VOIC, order numbers DEC-11-LRFSA-A-UBl and 
DEC-11-LRFSA-A-UB2, on DECtape units and 1. 
The -UBl reel should be mounted on unit 0, and 
the -UB2 reel on unit 1. 

Set the WRITE ENABLE /WRITE LOCK switches on the 
drives to WRITE LOCK. 

Set the REMOTE/OFF/LOCAL switches on the drives 

to REMOTE. 

While logged into the system under account [1,2], 
run the BUILD program from the system disk as 
f ollov/s . 

RUM $BUILD 

The program prints the following tv/o lines. 

SYSTEM BUILDER 
SYSTEM BUILD? NO 

Type NO in response to the SYSTEM BUILD question. 
BUILD continues with the following questions. 

AUXILIARY BUILD DEVICE? DT0 
CONTROL FILE IS? UTLLNG.CTL 

Type DTO as the device and type UTLLNG.CTL to 
specify the correct control file. BUILD begins 
executing the commands in the file UTLLNG.CTL. 
Refer to Figure 4-1 for a sample of the console 
printout of the entire procedure. 

Completion of the procedure is signalled by the 
BUILD COMPLETE message. Proceed to Section 4.7.1 
to continue with the FORTRAN installation. 
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CONCISE COMMAND LANGUAGE (CCL) 



PROBLEM: 

The description of the CCL option in Section 2.7.24 of 
the RSTS/E System Generation Manual states that 
BASIC-PLUS immediate mode statements and commands can 
be superseded by defining CCL commands which override 
the command. Because of a change in the CCL parser 
(all spaces are no longer deleted) for V06A-02, this 
feature is almost impossible to implement 
successfully . 



SOLUTION: 

The BASIC-PLUS syntax analyser removes all intervening 
spaces and tabs from a line input at the terminal. If 
a CCL command BYE were defined, it would override the 
BASIC-PLUS command BYE. If the user, however, types 
the BYE command with embedded spaces, the CCL command 
parser does not remove the embedded spaces but merely 
reduces spaces and tabs to one space. For example, a 
command B YE typed does not match the entry BYE in the 
CCL table and is passed to the BASIC-PLUS syntax 
analyser which recognizes it correctly. 
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PROBLEM: 

Section 3.3.2 concerning changing LOGIN contains a typographical 
error in line number 15010. 



SOLUTIONS 

Change to an equal (=) character the last minus (-) character on 
the second physical line of statement 15010. The second line should 
read as follows : 

:J% = 16% IF (A% AND -256%) = 256% 

T 
The arrow indicates where the change should appear. Any users who 

have altered LOGIN using this statement should check the source 

file and recompile (with the correction) if the error exists. 



SOFTWARE PRODUCT 

RSTS/E SYSTEM DOCUMENTATION 


VERSION 
V06A-02 


COMPONENT 

RSTS/E SYSTEM MANAGER'S GUIDE 
DEC-11-ORSMD-A-D 


VERSION 
N/A 


SUBPROGRAM OR ADDITIONAL INFORMATION 


SEQUENCE 

5.3.1 


PAGE 

1 o-^i 


NEW REPLACEMENT ARTICLE 


ORIGINAL DATE 
March 1976 
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ERPOR IN SYSTEM USER'S GUIDE FOR RSTS/E (SPR llD-1286 LS) 



PROBLEM: Page 4-103 of the RSTS-11 System User's Guide states "The 
operator is told that the reel of tape to be physically mounted is 
MY TAPE. He then responds with the physical unit number on which the 
tape is mounted." This is incorrect. 

DISPOSITION: The second sentence of the above quote should be modi- 
fied to read "He then responds with the physical device name and unit 
number (e.g., MT0:) on which the tape is mounted." This correction 
will appear in the next revision of the manual. 



RSTS/E SYSTEM DOCUMENTATION Seg 5.4. 
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ERROR IN EXAMPLE PROGRAM DESCRIBING THE XLATE FUNCTION (SPR 11-6993 TT) 



The example program on page 12-24 (section 12,7 The XLATE FUNCTION) 
of the BASIC-PLUS Language Manual, contains an error. 

Line 110 in the program is: 

110 T$=CHR$ (I%)+T$ FOR I%=0% TO 47% 
Replace this with: 

110 T$=CHR$ {JZ(%)+T$ FOR I%=J2(% TO 47% 



RSTS/E DOCUMENTATION Seq 5.5.2 
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ANALOGOUS IF THEN STATEMENT CONTAINS A LOGIC ERROR (SPR 11-8102 JC) 



The BASIC-PLUS Language Manual, page 8-22, describes the UNTIL 
modifier by using an analogous IF THEN statement which contains 
a logic error. 

The condition in the UNTIL modifier is checked before the statement 
is executed. In the analogous IF construction, shown on page 8-22, 
the statement being conditionalized is executed regardless of the 
results of the following IF statement. The analogous IF construc- 
tion should be changed to read as follows : 

20 IF X=SQR(Xi2) THEN 30 ELSE 40 

30 X=X+1 \GOTO 20 

40 PRINT X 



RSTS/E SYSTEM DOCUMENTATION Seq 5.5.3 
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Changing LOGIN 



PROBLEM: 

Section 8.3 concerning changing LOGIN contains a typographical 
error in line number 15010. 



SOLUTION: 

Change to an equal sign character the last minus (-) char- 
acter on the second physical line of statement 15010. The second 
line should read as follows: 



:J% = 16% IF (A% AND-256%) = 256% 



t 



The arrow indicates where the change should appear. Any user who 
has altered LOGIN using this statement should check the source file 
and recompile (with the correction) if the error exists. 



SOFTWARE PRODUCT 
RSTS/E SYSTEM DOCUMENTATION 


VERSION 
V06A-02 


COMPONENT 

RSTS/E PROGRAMMING MANUAL 

DEC-11-ORPMA-A-D 


VERSION 

N/A 


SUBPROGRAM OR ADDITIONAL INFORMATION 


SEQUENCE 
5.6.1 


PAGE 
1 OFl 


NEW REPLACEMENT ARTICLE 

q: czi 


ORIGINAL DATE 
March 1976 
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DATA RETURNED IN MONITOR TABLE PART II SYS CALL 



PROBLEM: The description of the Data Returned in bytes 15 and 16 
does not state what is actually passed back to the user. 

DISPOSITION: Replace the description on page 7-107 with the follow- 
ing: 

15-16 (RTSLNK) - the root link word in the linked list 
of Run Time System description blocks. The last 
entry in the list is denoted by zero. 



RSTS/E SYSTEM DOCUMENTATION, V06A-02 
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DISABLE TERMINAL SYS CALL (F0=8) ON SYSTEM CONSOLE (KBO:) 



PROBLEM: 

The description of the Disable Terminal SYS Call to 
FIP (F0=8) erroneously states that error number 18 is 
generated if the keyboard number in the data passed is 
(that is, the system console' keyboard). 



SOLUTION: 

Remove from the list of Possible Errors on page 7-52 
the error concerning KBO: (the system console). 

Add the following notes to the Discussion on page 
7-52: 

This call can disable the system console 
terminal (KBO:). Disabling KBO: is a 
dangerous operation because the SHUTUP 
system program runs only on that terminal. 

Any terminal disabled by this call remains 
disabled until the system is bootstrapped 
again. To disable a terminal (other than 
KBO:) during multiple time sharing 
sessions, it is recommended that the SETKEY 
option be executed as described in Section 
3.5 of the RSTS/E System Generation Manual. 
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ERROR IN ACCOUNTING DUMP SYS CALL TO FIP 



PROBLEM: The description of the Data Passed incorrectly states that 
the project-programmer number is in bytes 3 and 4. 

DISPOSITION: Replace the current description of bytes 2 through 30 
on page 7-93 with the following description: 

2 CHR$(-15%), the accounting dump code. 
3-4 Not used. 

5-6 Project-programmer number of the account to which 
the system dumps the accumulated usage data. See 
Section 7.2.3 for a description of each byte. 

If both bytes are zero, the data is dumped to the 
current account. 

7-30 Not used. 
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INCORRECT DESCRIPTION OF LOGOUT SYS CALL 

PROBLEM: The description of the LOGOUT SYS call (F0=5) incorrectly 
states that the special flag JFHIBY must be set to execute this call. 

DISPOSITION: The use of the JFHIBY status bit was removed in V06A-02 
of RSTS/E. Remove all reference to JFHIBY flag from the description 
on page 7-74 of the RSTS/E Programming Manual (DEC-11-ORPMA-A-D) . 
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CONVERTING NUMERIC DATA 



PROBLEM: Users encounter difficulty when using Record I/O to read 
numeric data from a virtual array file. Data retrieved by the CVT 
function appear to have their bytes swapped. 



DISPOSITION: The CVT functions rearrange the ordering of bytes 
when converting data. The attached dociunentation is provided to 
clarify the operation of the CVT functions. Insert the pages in 
the RSTS/E Programming Manual following page 8-10. 
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8.5 CONVERTING NUMERIC DATA 

A BASIC-PLUS program stores numeric data in memory in either 
floating point or 2-byte integer format. When performing 
input and output of the numbers with Record I/O, a program 
manipulates the data in an intermediate I/O buffer. Because 
BASIC-PLUS addresses data in the buffer through character 
definitions, the program must convert numeric data to 
character format for transfer to the I/O buffer before the 
output operation. Likewise, numeric data input by the 
program for processing in memory must be converted to 
numeric format after extraction from the I/O buffer. 

The CVT functions are provided to perform the required 
format conversions. These functions are implemented for 
speed rather than for logical ordering. They use stack 
operations to convert data and, hence, reverse the expected 
ordering of bytes. In converting 2-byte integer data, the 
reversal merely transposes the high and low bytes of the 
word. In converting floating point data, however, the high 
and low bytes of each word are transposed and the ordering 
of the words is exactly reversed. 



The reversal is usually not evident 
program manipulating data with Record 
function before loading the data into 
later executes a related function upon 
back. 



to the program. A 
I/O executes one 
the I/O buffer and 
reading the data 



Figure 8.5-1 shows the conversion of 2-byte integer data by 
the CVT functions. 



Integer 



String 





Byte 1 


Byte 


— 




s 


HI 


LOW 


CVT%$ 






CVT$% 



Byte 




Figure 8.5-1. CVT Conversion of 2-byte Integer Data 



The CVTJS$() function reverses the byte order of the integer 
data word. The related function CVT$i6() reverses the byte 
order of the character data, thus returning the integer to 
its correct byte order. 
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Pace 2 



This re 
Record I 
such cl 
correct 
byte or 
execute 
order . 
internal 
value o 
using no 
two byt 
function 
2-byte i 



vers 
/O t 
re urn 
byte 
der 
the 
For 
rep 
n a 
n-fi 
es 
, as 
nteg 



al is 
o read 
stances 

order . 

of th 
SWAP3(() 
examp 
resenta 
DOS mag 
le stru 
of a 

shown 
er form 



evi 
data 
t 
Th 
e d 

fun 
le, 
tion 
tape 
ctur 
buff 
belo 
at . 



dent , 

not 
he d 
e CVT 
ata 
ction 
the s 
of t 
labe 
ed Re 
er a 
w , CO 



ho 
writ 
ata 
$* f 
in 

to 
yste 
he 
1. 

cord 
ddre 
nver 



wever 
ten b 

read 
uncti 
the 
put t 
m wri 
date 
A pro 

I/O, 
ssed 
ts t 



when 
y Reco 

into 
on' reve 
buffer . 
he byte 
tes the 

as a 

gram , r 

access 

by D$ 

he str 



a prog 

rd I/O. 

the buff 

rses the 

A prog 

s in the 

standar 

2-byte 

eading t 

es the 

The 
ing D$ 



ram uses 

Under 

er is in 

correct 

ram must 

proper 

d PDP-n 

integer 
he label 
date in 

CVT$5l() 

to the 



10 D% = SWAP$(CVT$!l(D$)) 
20 PRINT DATE$(Dil) 



The CVT$%() function reverses the correct order of the 
bytes. The SWAP$() function swaps the high and low bytes to 
place them in proper order. The integer D% is afterwards 
used in the DATE$() function to produce the standard printed 
format for the date. 

Figure 8.5-2 shows the conversion of 2-word floating point 
data by the CVT functions. 



Floating Point (2-word) 
Byte 1 Byte 



EXP 



IVIED 



Byte 3 



HI 
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Byte 2 
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Byte 1 
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Byte 3 




Byte 2 



Figure 8.5-2 CVT Conversion of 2-word Floating Point data 



When converting a 2-word floating point value to a '<-byte 
character string, the CVTF$() function stacks the bytes in 
the reverse of their original order. The sign and exponent 
bits are not in the standard format. The same reversal 
occurs when the CVTF$() function converts a JJ-word floating 
point value to an b-byte character string. The results of 
the 4-word case are shown in Figure 8.5-3. 
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Floating Point (4-word) 
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HI 



Byte 



LOWEST-HI 



LOWER-HI 



LOW-HI 



EXP 



Byte 7 Byte 6 
Figure 8. 5-3. CVT Conversion of 4-word Floating Point Data 



Normally the conversion makes no difference because a 
program converts numeric data using one function and 
converts it back again using the related function. 
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A solution to reading virtual array numeric data by Record 
I/O operations is to reverse the byte order of the data in 
the buffer before converting it. 



NOTE 



Reading a 
Record I/O 
programming 



virtual array 
is not a 
practice 



file using 
recommended 



because 



the 



CONVERTING NUMERIC DATA Page 4 



usefulness oT the automatic virtual 
array addressing mechanism is lost. 



The following sample program creates a virtual array file 
and reads back the numeric data, reverses the byte order of 
the data in the buffer, and generates the numeric 
representation using the CVT function. 



100 OPEN 'VIRT.DAT' FOR OUTPUT AS FILE U 

120 DIM #1, ACQ) \ A,A(0) = RND » 1000.0 

140 PRINT A \ CLOSE 1* 

200 OPEN 'VIRT.DAT' FOR INPUT AS FILE 2% 

220 L% = LEN(CVTF$(1 .0)) \ GET «2% 

240 B$ = " \ FOR 1$ = L$ - U TO 0% STEP -1J 

260 FIELD 42%, 1% AS 81$, U AS B1$ 

230 B$ = B$ + BU \ NEXT 1% 

300 PRINT CVT$F{B$) ; 'SHOULD EQUAL';A 

32767 CLOSE U,2% \ END 



Figure 8.5-4. Sample Conversion of Virtual Array Data 



The assignment statement at line 220 determines whether the 
2-word or 4-word floating point package is on the system. 
The length of the string returned is either four characters 
(2-word package) or eight characters (4-word package). The 
statements between lines 240 and 280 reverse the order of 
the characters returned in the buffer. The CVT$F( ) 
statement at line 300 converts the reversed string to the 
floating point format. (To handle 2-byte integer data read 
from a virtual array file, simply use the SWAPJO function 
which" reverses the byte order.) 

Further information on CVT functions and storage format can 
be found in the BASIC-PLU S Language Manual under the 
following headings and sections: 

Integer constants and variables, 6.1 

Integer arithmetic, 6.2 

Mixed mode arithmetic, 6.7 

CVT conversion functions, 12.5 

RSTS floating point and integer formats, E.I and E.2 
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USING ASCII I/O FOR SCRATCH DATA FILES (SPR 11-8422 JC) 



The manual suggests reusing scratch files rather than recreating 
them and increasing directory fragmentation. If the reused file 
is written with a lesser amount of data, the old data remains in 
the unused part of the file. This condition occurs because BASIC- 
PLUS null fills a partially unused block but retains old data in 
remaining unused blocks. It is impossible to shorten a file. 

When using ASCII I/O for scratch data files, it is best to specify 
OPEN FOR OUTPUT which deletes an existing file and creates a new 
version. 



RSTS/E SYSTEM DOCUMENTATION Seq 5.6.8 

RSTS/E PROGRAMMING MANUAL DEC-11-ORPMA-A-D 1 of 1 
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COBOL LINAGE Clause (SPR 11-5594 ) 

PROBLEM: 

LINAGE Clause does not work properly. 

Example: if LINAGE is set to 66, and 33 or more lines are 
printed, then top of page will not be performed 
correctly. 



DISPOSITION: 

This is systematic of a serious page format problem in the COBOL 
run time system. The LINAGE clause cannot reliably format a 
printed page. A fault in the COBOL I/O run time system has been 
identified. 

Until patch is published, do not use the LINAGE clause for page 
formatting but do it explicitly in the COBOL program using WRITE 
statements for top and bottom of page formatting. 



SOFTWARE PRODUCT 

COBOL- 11 


VERSION 
VOl.OA 


COMPONENT 

Notes/Programming Hints 


VERSION 

N/A 


SUBPROGRAM OR ADDITIONAL INFORMATION 


SEQUENCE 
6.2.1 


PAGE 
lOF 1 


NEW REPLACEMENT ARTICLE 


ORIGINAL DATE 
January 1976 
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Page Formatting with Undesirable LINAGE (SPR 11-5863 ) 



PROBLEM: 



During OPEN processing for a file with LINAGE specified, an 
undesirable top-of-form is issued to the output file. 

The very first WRITE issued for a print file will shift the 
O/P line one space to the right. 



DISPOSITION : 

This is not patchable for VI. OA but will be fixed in the V2 
release in January 1976. 



SOFTWARE PRODUCT 
COBOL- 11 


VERSION 
VI. OA 


COMPONENT 

Notes/Programming Hints 


VERSION 

N/A 


SUBPROGRAM OR ADDITIONAL INFORMATION 


SEQUENCE 

6.2.2 


PAGE 

1 o-^i 


NEW REPLACEMENT ARTICLE 


ORIGINAL DATE 


rT\ en 


Januai 


-y 1976 
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Data Item Length Restriction (SPR 11-6068 RR) 



PROBLEM: 

COBOL-11 VI. OA restricts any data item to be less than 4096 
bytes (characters) long. This is an implementation restriction. 



SOLUTION: 

In the next release of COBOL-11 (February 1976, COBOL-11 V2) 
this restriction is appropriately diagnosed at compile time 
(Diag 460) . 



SOFTWARE PRODUCT 

RSTS/E COBOL-11 


VERSION 
VI. OA 


COMPONENT 

NOTES/PROGRAMMING HINTS 


VERSION 


SUBPROGRAM OR ADDITIONAL INFORMATION 


SEQUENCE 
6.2.3 


PAGE 
1 OFi 


NEW REPLACEMENT ARTICLE 


ORIGINAL DATE 
February 1976 
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COBOL and Unlabeled Tapes on RSTS/E (SPR 11-5866 FI) 



PROBLEM: 

COBOL- 11 cannot read and write magtape files that are not ANSI 
labeled tapes on RSTS/E systems. 



DISPOSITION: 

Processing of magtape files by COBOL is currently restricted to 
ANSI labeled tapes only. 



SOFTWARE PRODUCT 
RSTS/E COBOL-H 


VERSION 
VI. OA 


COMPONENT 
N/A 


VERSION 
N/A 


SUBPROGRAM OR ADDITIONAL INFORMATION 


SEQUENCE 
6.2.4 


PAGE 
1 ^'^l 


NEW REPLACEMENT ARTICLE 


ORIGINAL DATE | 


"71 


Apri; 


. 1976 
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OPEN STATEMENT TO TERMINALS FAILS (SPR 11-8093) 

PROBLEM: On RSTS/E COBOL V2 an OPEN statement will fail if 
the output device is specified as KEnn:. 

DISPOSITION: The FCS emulator RTSLIE expects unit nmbers 
to have octal values. In order to direct I-O to a keyboard, 
therefore, express the unit nimiber as an octal number', e.g.' 

SELECT TEST ASSIGN TO "KBll:". 

will direct RTSLIB to open KB9:. 



COECL-11 VI. OA, V2 for RSTS/E V06A-02 Seq 7 

CGEOL-11 USER'S MANUAL DEC-11-LCOBA-B-D 1 of 1 



RSTS/E Softv^are Dispatch 
June 1976 



COBRG TOO BIG FOR STANDARD COBOL COMPILER (SPR 11-8452 BR) 



COBRG is too big for standard COBOL compiler. 

Build 28K COBOL compiler using LNGBLD, When asked ANY CHANGES?, 
answer YES and specify a new size of 28. 



COBOL-11 V2 for Seq 9 

RSTS/E V06A-02 1 of 1 



RSTS/E Software Dispatch, July 1976 



CROSS REFERENCE PROBLEM (SPR 11-8522 FI) 



Cross Reference listing option (/CREF) does not always work on RSTS/E. 

The problem is due to faulty assignment of logical units to CREF 
scratch files in the task build command file (CBRSTS.CMD) for COBOL 
on RSTS/E. The list of logical unit assignments should be as shown 
below. Modify CBRSTS.CMD and rebuild COBOL-11 and CREF should work. 

; C B R S T S , C ri \'> 

t 
f 

;THIS FILE IS THE C0H^•4^in FRt FOR T^B TO BUILD THE COHOL-ll 0V£RLAV STRUCTURE 

}FOR KSTS/E V,6 COeOL. THE OVEKLAy oesCSIPTOK FJLt IS CBRSTS.ODL 

CnBOL#CtlRaLsCr«STS.nDL/-iP 
TASK s .,,Cr*L jTiSK Name 

STACK = 51? :Thi. PfFAuLT 

UNITS = lil 

• 

JTNE FOLLOWING Ti^O C''"~if'a f-DS DFFPJE Tt-t I^JTFHf'AL STORAGE USED BY THE 
rCO^PILtfi (••F-'^LK) AND w;j.-i.TI"E SYoTt'" (i'Fh'iDl FOs PROCESSING 
jTHg S0FTi-.4SE VIRTUAL >-f^.!'.Oriy i^OBKFILE. 
jTHt MiN,l«!ir' ViLUtS FfiP TmFS Ah*F,AS 4Rt 
! nFbLk J*^/-.:.-' (OCTAL) 

..FE^njS-;^;?;' (OCTAL) 
^'FT tFFECT OF £ " T F -if; I N:i-i THE SUF Of THfcSE ARfAS IS TO SPEEO UP THE 

1TIC.C3 k ...r\ nii*.i TTUE i-kj(-TPii 



;THt ^FT tFFFCT OF E" TF ..f;I N:.-i THE SUF QF TH£SE ARfAS IS TO SPEE!! 
(COMPILtR ArjP) «UM Tl^fc, SYv'iTEw 

• INj ADOITIO'^ TH£ AREA ■•^FF^O ^' A Y HAVE TO BE EXPANDED DEPE^■iDI'■G 0> 
jSIZE OF THE COBOL PKOQ^n^: np ThF fjjMRFt,' op S I^ULT A.-JEOilSLY nPEN 
jFILFS IN THE OUN'JP'G PSOGWiM, 
•*****♦ 

;EXTENSI0N OF ThESE ASEAS ShOIiL^' R? In BLOCKS OF ^^^ipi (OCTAL) 
•♦**** 



THE 




SED, 

IcH WILL 

HAKS OF 



RSTS/E V06A-02 Seq 10* 

COBOL-11 V2 1 Of 2 



.41 



EXTSCT = ^FRL'<Ji2J^>^ 
EXTSCT S «F£MO jTlOi's; 
EXTSCT = iSFS«ll6ia.« 

4SG s SY;i2,SYjn»SY:ia 

I 

iCALL paHa-ieTERS FOLLn« 
GSLOEF a CATHSZjH 

GBLOtF = NE*«AG:1 J-E"^ ^AG T4PK E^ARLED 

GBLOEF s PHEFIXi-^.V.^K'./ j'ULL/^'ULL 

RBLDEF = Pr)SFIX;v!,;'SvM5 jC^/LF 

GBLOEF = C>*LVER;31t'b? jaSCII "t'2" 

GrtLDEF = CRUEOlj2i5101 jaSCII "A " 

GBLDEF s F,UFC^TJ) si ^^R SINGLE 5 FO^ DOUBLE PUPFEPiNG 

GBLOEF s CSTSSWn jNON-'/ FOR RSTS 

J 

{LOGICAL UNIT A.SSIGN^'E^JTS (ahOVE) 

,3 . aO«KFIUE 

jU - ACCEPT nEVICE LU'J 

j5 - DLPLAY DEVICE LUN 

j6,7,8 - CR£F SCRATCH FRES 

|6 - SOURCE FILE INPUT A^JD FIKST USEP FRE Lli^J 

|7 - LIBRARY FILE ImpuT 

j6 - OPJECT Psn&RAM FILE OUTPUT 

j<9 - INTER^'EDIATE OBJECT FILE 

1 10 - LISTING FILE OUTPUT 

jll - C*^EF DATA FitE 

>12 • SECOND '.'O^K FILE 

j6 - l« BUM-TIME CnSOL FILES 

iTHE fJEXT COM'-AMD lOE'-'TIFieS Ti^lS TiSi* a5 A CO^-PRE AND GO SVSTE^ 
|T0 THE BESICIE'jT COf^PILE" CODE 

i 

GBLOEF = TASKSi-Jl 

GBLOEF = MS&LUN;2 

GBLDEF = ^RKLUt^sJ 

GBLOEF = ACCLUNjii 

G8LDEF s OTSLU^sS 

GBLDEF = XLU^d. 

GBLDEF = IMLU^nP 

GBLDEF B nuTLU''''lt' r<OT USED HuT NEEDS TO t«EDEFINEO 

GBLDEF = MULeuFiki j^^OT USED BgT ^EFD? TO BE HEFI^ED 

GBLDEF = SfCLitfiih 

GBLOEF = CPYLUNS7 

GBLDEF = OBJLU^!l'^ 

GBLDEF s l^TLU^itl 

GBLOEF = LSTLU^Jl? 

GBLDEF s CHFLUNjlJ 

G8L0FF s MAPLU^inS 

GBLOEF s wFJLu'^Slu liECOf^O i^ORK FILE 

GBLDEF s FlKLUfJJfc 

GBLDEF s haxFlS:!^ 

GBLDEF s TTOEvsuinS f'^H FDP PST5/E 

/ 



RSTS/E V06A-02 Seq 10* 

COBOL- 11 V2 2 of 2 
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GO TO RESERVE WORD PROBLEM (SPR 11-8169 BR & RB) 



A GO TO statement whose destination is a reserved word causes 
compiler to loop. 

The problem will be corrected in module AGOP. This will be con- 
sidered for the next release of PDP-11 COBOL. 



COBOL- 11 V2 for Seq 11 

IAS VI, VI. 1, RSX-llD V6A, V6B(V06.01) 1 of 1 

and RSTS/E V06A-02 
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RSTS/E Software Dispatch, July 1976 



UNSTRING VERB USING NONINTEGER DATA ITEMS (SPR 11-8169 BR & RB) 



An UNSTRING statement containing a noninteger numeric receiving 
field causes fatal error #222. No such diagnostic should be issued 
as this is a legitimate operand. 

The compiler module UNST will be corrected to permit a noninteger 
numeric receiving field in an UNSTRING statement. This will be 
considered for the next release of PDP-11 COBOL. 



COBOL- 11 V2 for Seq 12 

IAS VI, VI. 1, RSTS/E V06A-02, RSX-llD V6A, V6B(V06,01) 1 of 1 
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RECORD SIZE APPEARS AS FOUR ASCII BYTES (SPR 11-9108 BR) 



1. Record size appears as four ASCII bytes in magtape files. 

ANSI magtape conventions prescribe four ASCII bytes to define record 
size. See PDP-11 COBOL User's Guide Version 2, DEC-11-LCUGA-B-D, 
section 6.2.5. 

2. Magtape record blocking not expected if BLOCK CONTAINS 512 CHAR- 
ACTERS appears in COBOL program. 

Default magtape blocking uses a minimum physical block size of 
512 bytes. Each such block contains one or more complete (no record 
spanning) logical records. See PDP-11 COBOL User's Guide Version 2 
DEC-11-LCUGA-B-D, section 6.2.5. 



COBOL-11 V2 for IAS VI, VI. 1, RSTS/E V06A-02, Seq 14 

RSX-llD V6A, V6B(V06.01) 1 of 1 
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27 80 PACKAGE NOTE 



The RSTS/2780 package used for RSTS/E V05B-24 will not work with 
RSTS/E V06A-02. A new release of the 2780 package is available 
from digital's Software Distribution Center. The 2780 package 
must be available on the same type distribution medium as the RSTS/E 
software. Identification numbers for the RSTS/2780 package which 
is compatible with RSTS/E V06A-02 are listed below. 



DEC-11-ORCOA-C-UC 
DEC- 1 1-0RC0A-C-MC9 
DEC-11-0RC0A-C-MC7 
DEC-11-ORCOA-C-HC 



(DEC tape) 
(9-track magtape) 
(7-track magtape) 
CRK disk cartridge) 
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SOFTWARE PRODUCT 

RSTS/E 2780 Emulator 


VERSION 

N/A 


COMPONENT 

2780 Notes 


VERSION 
N/A 


SUBPROGRAM OR ADDITIONAL INFORMATION 


SEQUENCE 
8.1.1 


PAGE 
1 °^1 


NEW REPLACEMENT ARTICLE 


ORIGINAL DATE 



RSTS/E Software Dispatch 
January 1976 



Excessive I/O Errors 



On one system configured for the RSTS/E 2780 package, 
a large number of records sent by the remote system 
were not received properly and NAKs were returned. 
The communication lines checked out clean and all 
PDP-11 hardware was functioning properly. 

In this case, the DPll was located behind the system 
disk and DHlls on the POP-11 Unlbus. The position of 
a device on the Unlbus determines the relative 
priority for devices jumpered for the same hardware 
priority level. The device closest to the processor 
will have the highest effective priority. Hence, If a 
synchronous Interface such as a DPll or DUll Is 
located electrically behind DHlls and the system 
disks. It will not be serviced until there are no bus 
requests pending from the DHlls 
Heavy terminal and disk activity can 
DUll Interrupts long enough to 
Overruns on transmit or receive will 
to be NAKed. 



and system disk. 

lock out DPll or 

cause overruns. 

cause the record 



If excessive 2780 I/O errors do occur, DEC Field 
Service should check the hardware configuration to 
determine the position of the DPll or DUll in relation 
to other priority 5 devices on the Unlbus. Reposition 
the DPll or DUll to be electrically behind the system 
disk but in front of any DHlls. 



SOF=TWARE PRODUCT 
RSTS/E 2780 Emulator 


VERSION 

V06A-02 


COMPONENT 
2780 Notes/Programing Hints 


VERSION 

N/A 


SUBPROGRAM OR ADDITIONAL INFORMATION 


SEQUENCE 
8.1.2 


PAGE 
lO^l 


NEW REPLACEMENT ARTICLE 

rj2 m 


ORIGINAL DATE 
Januairy 1976 
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Reporting Problems With 2780 



Before submitting an SPR on 2780, there are several pieces of infor- 
mation which should have been acquired. If these are included with 
the SPR, it saves time in recontacting the user and prevents going 
down some dead-end paths. 

1. what kind of 2780 (DOS, RSX-llM, RSX-llD, RSTS/E) ? 

2. What version of the package? 

3. Configuration of the PDP-11 

a. memory 

b. devices on system 

c. system load 

d. synchronous device (DU or DP) 

4. What kind of modem is on our side, on the other side? 

5. What speed? 

6. What system are you communicating with? If it is another PDP-11, 
answer the questions above. 

If it is another vendor, find out 

a. What operating system is being used and what communications 
software (i.e., OS/MVT HASP, OS VS2 HASP)? 

b. What interface is being used (i.e., 2703, 370X, 
Memorex 1270)? 

This information is necessary for correct diagnosis. For example, 
there is a problem with a DOS/2780 which occurs only on a system 
with a DUll, four-wire leased line going into a Memorex 1270 



■FT-nn-t-— onri 



TVlo CTTTTl'n'f'riTTlca c/^nn/^ 1 llrA Viarl T^Vtr\n*a 1 nnciC! r\ir mor^om 



incompatibility and will be diagnosed as such unless we have 
all the information. 



SOFTWARE PRODUCT 
RSTS/E 2780 EMULATOR 


VERSION 
V5B and Later 


COMPONENT 
NOTES/PROGRAMMING HINTS 


VERSION 


SUBPROGRAM OR ADDITIONAL INFORMATION 


SEQUENCE 
8.1.3 


PAGE 


NEW REPLACEMENT ARTICLE 


ORIGINAL DATE 
February 1976 
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Installing and Troubleshooting 2780s 



Installing a communication package involves a minimum of two 
vendors and more likely three or four. The most time-consuming 
aspect of installation can be pinpointing the problem. When 
installing A to communicate with B, the problem may be in one 
of seven areas. 

A's software (either code or sysgen parameters) 

A ' 8 hardware 

A ' s modem 

phone line 

B ' s modem 

B ' s hardware 

B's software 

Sometimes a given symptom can have several possible causes. Then 
it is necessary to go through a step by step elimination procedure. 

Here are some ideas and suggestions for when difficulties arise in 
installation of 2780 packages. 



SOFTWARE PRODUCT 

RSTS/E 2780 EMULATOR 


VERSION 
V5B and Later 


COMPONENT 

NOTES/PROGRAMMING HINTS 


VERSION 

N/A 


SUBPROGRAM OR ADDITIONAL INFORMATION 


SEQUENCE 

8.1.4 


PAGE 
lOF 9 


NEW REPLACEMENT ARTICLE 


ORIGINAL DATE 
February 1976 
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Installing and Troubleshooting 2780s Page 2 of 9 



1. What is a 2780 and what is its protocol? 

For those who are unfamiliar with what a 2780 emulator is emulating, 
here is a short description of what it is and what its protocol 
is like. 

The 2780 was an unintelligent, hard-wired terminal which could 
communicate to an IBM host or to another 2780. It read cards 
and transmitted them over a synchronous link to another computer. 
It received data back and printed it. The model 2 2780 could also 
receive back data for a card punch. 

The 2780 would send 80 character card image records blocked into 
a maximum of a 400 character block. It did have the ability to 
drop trailing blanks in the record if told to do so by the 
presence of a special control character (the EM-end media option) . 
For reception it would print or punch a file according to a per- 
ipheral selection code (basically an Escape 4 would send a file 
to the punch) . It was able to accept horizontal tabs and would 
handle them according to the spacing of a special HT record which 
would be sent at the beginning of the file. The block size was 
again a maximum of 400 characters. 

A synchronous protocol is used to enable the data to be sent back 
and forth. The protocol determines who speaks, when, and whether 
or not the other end heard them correctly. When there is synchron- 
ous communication, the two modems sanple the line at a preset speed 
(2000 times a second or 4800, etc.), and the data is sent in 
blocks with one character directly following another. Every 
message, therefore, whether a single control character or a 
400 character block, is preceded by four SYNC characters and 
followed by a PAD. The SYNC characters are used to allow the 
hardware to tell when valid data is coming (as opposed to noise 
on the line) , and the PAD is used to make sure that the final 
significant character is fully received. Every data record sent has 
a CRC (circular rediondancy check) computed on its characters, and 
following each lUS, ETB, and ETX is a two-character checksum which 
is used to make sure the data was received correctly. 
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Installing and Troubleshooting 2780s 



Page 3 of 9 



The major control characters used in the 2780 protocol are: 

ENQ (enquiry) : (D Used to request permission to 

send data (bid) ; 
(2) Used to request resending of 
a missed response. 



ACK0 (acknowledge) : 



ACKl (acknowledge) : 

NAK (negative acknowledge) : 
STX (start of text) : 

ETB (end of block) : 

ETX (end of text) : 

lUS (intermediate record end) 
EOT (end of transmission) : 



(1) Used to give permission to 
send data; 

(2) Used to accept every other 
data block. 

Used to accept every other 
data block. 

Used to reject a data block. 

Used to indicate the beginning 
of a data block. 

Used to indicate the end of a 
data block. 

Normally used to indicate the end 
of the final block of the job. 

Used to indicate the end of a record. 

Used to indicate completed trans- 
mission and give up control of 
line. 
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Installing and Troiibleshooting 2780s Page 4 of 9 

A sample job might be sent as follows: 

A B 

ENQ — *- ; request permission to send 

-* — ACK0 ;permission given 
STX DATAl ETB —*■ ;block of data 

" — ACKl /acknowledge correct reception 
STX DATA2 ETB — ^ ; another block 

-*— ACK0 
STX DATA 3 ETB — ^ 

-* — NAK ; rejection of data 
STX DATA3 ETB — " ;resending of data block 

-.— ACKl 

STX DATA4 ETX — ► 

ENQ — »- ; 3 second silence request for response 

-* — ACKl /response shows did not see block, 
since an ACK0 is the expected 
response for DATA4 

STX DATA4 ETX — ^ ;block resent 

-.— ACK0 

EOT — »- /transmission complete 

-« — ENQ /Other side requests permission to 
send data 
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Incorrect Stack Management in Arithmetic Expressions 





.IDEnT 


14M4Y 


? \A<^A? ^1 


.PSEC? 


? I D A T A 


^^^./J'<fiiA 


, "^ D K 


\.,^, \,^ 


7\<d^ d\<i) 


.«^0t<0 


12v*^«k9 


/1,4v^/)l 2 


,wOnO 


■i 


7>'A?i'^\& 


.-NOfrO 


'^ , l?l 


.n^t»vi2^ 


, 1^ D K D 


4 1010 


7i>A7iA'?2 


, wOi^O 


0,^ 


/I /i i^ ■! 5" »^ 


.PStCT 


SCODtl 


?\\d\A<A^^ XJ 






^^'*i<A\f^'^ 


MUV 


•4(M5),-(SP) 


?i^'^vr?& 


MUV 


«4(^5),-(SP) 


^\dViyi 1 \r 


MOV 


2(«b).-(SP) 


9l5??lv11 4 


MOV 


ft%I0AIA*14,-(SP) 


;^0»'/i?^ 


JSR 


pc,!^*'A2a) 


^li^!?/?4 


MOV 


^IDATa*22,SI 


^ ki k? /I 3 1^ 


MUL 


«je',Pi 


a/it?>i:?34 


MQV 


iiOATA*22,^0 


Tf-d^d^^ 


ASH 


ft 4 , >< 


Ji^>)V\d^A 


AOO 


*lf)ATfl+l6,R<J 


1^ 1^ 1^ 5 V!* 


MOV 


«fri,i-Tfc.MiaS 


:a ki i^ v!* ^ 4 


MOV 


f<l, *T£m»S*2 


ii.ifl^fe^ 


StTU 




■:?I0V5^62 


LtHi 


2 Zi t !^ '/I ) f F i;^ 


V^ l^ ?! »! fi f) 


STD 


F^,-(SP) 


-1iai^v^7j5 


Jb-J 


^4,MLCCi 


■:^ I'l <?i / 7 4 


, wQNO 


fs 


:^»?^-^7ft 


h V 


*TE'^PS*2»*<i'' 


;i.^!^l;?i2 


ADO 


f 1 A T A ♦ 1 b , P ^) 


C5i1?>l^6 


StTD 




t'li^i^l 1 /( 


Lun 


2ii(H(i^) ,Fa 


:'ii)*^l 14 


sio 


F0,-(5>P) 


.^•it^ll 6 


Jb9 


PC.SwP44.% 


^»40l?2 


jae 


P4,S8CSi 


^kf)0l26 


HOV 


^Tt'MP3,»i/l 



SOFTV/ARE PRODUCT 
FORTRAN IV-PLUS 


VERSION 
Vj?l-03 


COMPONENT 
N/A 


VERSION 
N/A 


SUBPROGRAM OR ADDITIONAL INFORMATION 


SEQUENCE 

4 


PAGE 
8 OF 9 


NEW REPLACEMENT ARTICLE 


ORIGINAL DATE 
August 1975 
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3. Initial attempt to run 

One of the more frustrating circumstances is to bring up the 
package, issue a transmit command, and have it do absolutely 
nothing — including not giving out an error message. Silence, 
however, can be just as significant as a message. 

This section will itemize the things that can go wrong in the 
sequence in which they would be encountered. It is specified 
when systems react in different ways. The systems involved are 
core /Dos, RSX-llD, RSX-llM, and RSTS/E. 

a. RUN the program for the first time and 

(1) the system crashes in RSTS/E, 

(2) there is an odd address trap abort in RSX-llD or RSX-llM, 

(3) there is an F370 message in DOS and 

(4) mere is a halt in core. 

Probably the device address of the DUll is incorrect. The DUll 
is one of the floating device address devices. Check that the 
device was installed at the correct address (i.e., if the DUll is 
the only floating device on the system, it will be at 760040) 
and also that the system was told the same address. RSTS/E and 
core/DOS calculate the address; RSX-llD and M have it specified 
during taskbuild . 

b. Run the program and get ready to make the connect. Dial 
the phone, receive the beep from the other end, and push 
(or pull) the data button and 

(1) the data light does not light or 

(2) the DSR indicator does not light. 

Usually a dial-out system will not give DSR (data set ready) until 
DTR (data terminal ready) has been presented by the hardware. 

(1) check that the light is not burned out. 

(2) check that it is on-line (all systems except RSTS/E) . 

(3) check whether a valid but incorrect device address 
was specified (RSX-llD and M) . 

(4) check that the hardware diagnostics were run, including 
the one using the modem cable. 

(5) check that the DTR bit is on in the status word. 

With a leased line, the modem often has DSR strapped on constantly. 
In that case, this type of error may not be discovered until later 
in the procedure (see c. and d.). There are some dial-out modems 
(i.e., some Milgo modems) which have DSR strapped on also. They 
allow a transmit command to be given without the connection 
having been made (see d.) . 
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c. The program has been run and the connection established; 

a transmit transfer command is issued and a modem (or data 
set) not ready message is given. In all except RSTS/E, 

this indicates 

U) The data set is not ready (i.e., DSR is not up) or 

(2) A valid, but incorrect, device address has been used. 

For RSTS/E it indicates that the 30 second timer (set when the 
PUTD command is issued to the driver) has expired. In RSTS/E 
while in the driver, you are considered to be in I/O, and the 30 
second timer is used to prevent hanging in I/O. The error message 
actually indicates several possibilities for RSTS/E. 

(1) the modem is not ready. 

(2) the interrupt vector for the DUll or DPll is incorrect. 

(3) bid is getting no response. 

For details on these see d. 

d. This is at the same stage as c. The first transmit command 
has been issued, but nothing happens. There are several 
causes, although they are not all applicable to every 
system. 

(1) Incorrect interrupt vector (RSX-llD and M) or interrupt 
vector out of range (core/DOS) . Since in D and M the vector 
is specified at build time, check that it corresponds with the 
actual hardware vector. In core/DOS the DP is expected 

to be in the range of 300 — 376 and the DU in the range of 
300 — 476 (see Installation Notes pp. 3-2 and 3-3) . 

(2) No response to the bid (core/DOS, RSX-llD and M) . These sys- 
tems do an infinite retry on the bid if getting no response 
^except for RSTS/E which does a timeout) . Unfor- 
tunately this cause is really a symptom with multiple 
causes of its own. A list of suggested possibilities 

are: 

(a) the remote end software is not up (especially with a 
leased line you cannot tell) , or the connection was 
never made (a dial-out modem with DSR strapped on) . 

(b) the modems have different speeds (i.e., 2000 baud 
talking to 2400, etc.). 

(c) the modem is not sending out the signal (this can 
usually be checked by finding out whether the other 
end has seen the bid) . 
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(d) the other end is responding but the turn-around 
time is too fast (usually only true on a two-wire 
dial-out system where the other modem has not 
previously been used) . 

(e) this other end is responding but the modem either 
does not see it (receive strength too low) or 

the modem does not pass it back (bad receive leads 
on the modem) , or our hardware does not see it (bad 
receive chip or modem cable should be caught by 
diagnostics) . 

Determine a correct response to the bid by whether or not 
the package has gone into transmit mode. In all packages 
except RSTS/E check transmit mode by doing a QUERY. In 
all the packages if something goes wrong when in transmit 
mode, the user will get an error message instead of just 
hanging silently (see e) . 

When attempting to transmit, there are constant or 
extremely frequent transmit abort errors. Once 
again each system gives its own version of the error 
message, but they all indicate that either eight 
attempts to send a data block were NAKed, or eight 
ENQ requests for response were ignored. 

If the first block or first record are not accepted, 
the KGll may not be working right. If it is improperly 
seated, two zeros for the CRC characters will be gotten. 
The diagnostics should catch it quickly. 

If interfacing with DOS/POWER, the ENQ retry counts should 
be increased. 

If on a multi-user system, the package should not be on at 
a speed higher than that warranted. 

If on a multi-user system, the DPll or Dull should be the 
furthest forward hardware level 5 device on the bus (besides 
the system disk) . If problems persist (especially in a RSTS/E 
system with a DHll) , it should be raised to level G and the 
interrupt vector codes changed from 240 to 300. The other 
reasons for this are, of course, either bad modem, incompat- 
ible modems, or bad phone lines. 
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f. Transmit works fine but files cannot be received. 

Since you are able to transmit, it means that the hard- 
ware actually receives correctly (you have to receive 
responses). Therefore, there is quite probably some- 
thing about the type of data received. If actually 
in receive mode, it indicates that the other side has 
sent a bid, and you have responded with an ACK0. Some 
of the possibilities are as follows: 

(1) the modem is turning around too fast, and the other 
end does not see the response (usually only on a 
two- wire line) . 

(2) the other system is generated to think that you 
are something other than a 2780. This is quite 
common if the system is supporting 3780s and 
Workstations also. Surprisingly enough we will 
be able to transmit data files into the system 
since the 2780 protocol is a subset of the others. 
If the other system is genned for a 3780, the 
block will be 512 and we can only accept 400. 
Workstations do not use any lUSs, and we think the 
record is too long (most of our systems can only 
accept escape -characters and 132 data for a total 
of 134; they are being changed to accept the 

too long record and truncate it) . One way to 
check this is to ask how the other end sysgen 
parameters are set up for id or remote number. 
Then check this against the Installation Notes 
chapter for the central sites operating system. 

(3) The other system is genned for a 2780 with a 
140 character printer. This gives the same 
trouble as 2 . 

Installation is con5)lete when you can bring in the 2780 program, 
transmit files, and receive back data. 
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PROBLEM; 

The 2780 Handler will not respond to a received EOT while it is 
transmitting. 

SOLUTION: 



After a block has been transmitted, the 278O Handler should look 
for an EOT status being returned by the BISYNC protocol module. 
If such a status is found, the BASIC-PLUS program should be given 
an indication that the remote end has terminated the 
transmission . 

1. This patch should be installed on all V06A-02 systems which 
are configured with the 2780 Handler. 
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3. On the first or second page of the RSTS map under the heading 
"Program Section Allocation Synopsis" find the tag <Z.USER> 
and record the first number to the right of the section name 
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SOFTWARE PRODUCT 
RSTS/E 2780 Emulator 


VERSION 
V06A-02 


COMPONENT 
2780 Patches 


VERSION 
N/A 


SUBPROGRAM OR ADDITIONAL INFORMATION 


SEQUENCE 
8.2.1* 


PAGE 
lO'=2 


NEW REPLACEMENT ARTICLE 

1= 


ORIGINAL DATE 
December 1975 



RSTS/E Software Dispatch 
December 1975 



Improper Handling of Received EOT 

(first column of numbers) 
[Z.USER] = 



4. Bootstrap the RSTS/E system disk normally to load the 
initialization code into memory. Then use the patch option 
of the INIT code to install the patch as shown below. 



OPTION: PATCH 

MODULE NAME? RSTS 

BASE ADDRESS? [Z.USER] 

OFFSET ADDRESS? 1730 

MODULE BASE OFFSET OLD 

RSTS [Z.USER] 001730 OOOOOM 

RSTS [Z.USER] 001732 XXXXXX ?tc CONTROL/C Exit 



NEW? 

?000006 

?'rc CONTROL/C 



OPTION 



SOFTWARE PRODUCT 
RSTS/E 2780 Emulator 


VERSION 
V06A-02 


COMPONENT 
2780 Patches 


VERSION 


SUBPROGRAM OR ADDITIONAL INFORMATION 


SEQUENCE 
8.2.1* 


PAGE 
2 0^2 


NEW REPLACEMENT ARTICLE 


ORIGINAL DATE 


JU 1 1 


Decemb 


er 1975 1 
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Lost an<a Duplicate Re cords 



PROBLEM: 



When receiving a retry block, an abnormal format occurs while 
ignoring records already received correctly. A NAK is sent, 
after which the count of records to ignore (previously received 
correctly) is incorrect, resulting in lost or duplicate records. 
The patch below will correct the problem. 



PROCEDURE : 

1. This is a patch to the RSTS/E 2780 package. It should be 
installed on all RSTS/E V06A-02 system configured for the 
2780 Emulator. 



Obtain a listing of the RSTS lo 
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3. On the first or second page of the RSTS map under the heading 
"Program Section Allocation Synopsis" find the sections 
<Z.USER> and <PATCH> . Record the first number to the right 
of the section name (first column of numbers). 
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SOFTWARE PRODUCT 
RSTS/E 2780 Emulator 


VERSION 
V06A-02 


COMPONENT 
2780 Package Patches 


VERSION 
N/A 


SUBPROGRAM OR ADDITIONAL INFORMATION 


SEQUENCE 
8.2.2* 


PAGE 
1°^2 


NEW REPLACEMENT ARTICLE 


ORIGINAL DATE 
December 1975 
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Lost and Duplicate Records 



[Z.USER] = 



[PATCH] = 



4. 



Bootstrap the RSTS/E system disk normally to load the 
Initialization Code into memory. Then use the PATCH option 
of the INIT code to install the patch as shown below. 



OPTION: PATCH 
MODULE NAME? RSTS 
BASE ADDRESS? [Z.USER] 
OFFSET ADDRESS? 3276 
MODULE BASE OFFSET 

RSTS [Z.USER] 003276 

RSTS [Z.USER] 003300 

RSTS [Z.USER] 003302 



OLD NEW? 

005367 ? 004737 

000660 ? [PATCH]+164 Octal Addition 

112767 ? TC CONTROL/C Exit 



OPTION: PATCH 
MODULE NAME ? RSTS 
BASE ADDRESS ? [PATCH] 



OFFSET 

MODULE 

RSTS 

RSTS 

RSTS 

RSTS 

RSTS 

RSTS 

RSTS 



ADDRESS ' 
BASE 
[PATCH] 
[PATCH] 
[PATCH] 
[PATCH] 
[PATCH] 
[PATCH] 
[PATCH] 



164 

OFFSET 

000164 

000166 

000170 

000172 

000174 

000176 

000200 



OLD 

000000 

000000 

000000 

000000 

000000 

000000 

99 9999 



NEW ? 

? 005337 

[Z.USER]+4162 

063737 

[Z.USER]+4162 

[Z.USER]+4160 

000207 

TC CONTROL/C 



Octal Addition 



Octal 
Octal 

Exit 



Addition 
Addition 



OPTION 



SOFTWARE PRODUCT 
RSTS/E 2780 Emulator 


VERSION 

V06A-02 


COMPONENT 
2780 Package Patches 


VERSION 
N/A 


SUBPROGRAM OR ADDITIONAL INFORMATION 


SEQUENCE 
8.2.2* 


PAGE 
2 OF 2 


NEW REPLACEMENT ARTICLE 

ID 


ORIGINAL DATE 
December 1975 
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2780 Handler Failure on NAK/TIMEOUTs 



The 2780 package will return a "2780 HANDLER FAILURE" error 
message if a NAK or TIMEOUT occurs with a one block transmission. 
The patch described below will check for a NAK/TIMEOUT error on a 
single block file and return a "NAK/TIMEOUT ON LINE" 
if it occurs . 



error message 



PROCEDURE: 



This patch should be installed on all 
include the 2780 package. 



V06A-02 systems which 



Obtain a listing of the RSTS load map. This map wa 
during System Generation if a line printer was avai 
that time. Otherwise, the map must be printed from 
tape created at System Generation time (DECtape or 
distribution) or from the System Generation DEC 
distribution) . If obtaining the map from tape medi 
the file RSTS. MAP from the LICIL tape using PIP unde 
the System Generation monitor, or any DOS monitor, 
medium is DECpack, use extended PIP under RSTS/E with 
switch to print the file RSTS. MAP from account [1,1] 
System Generation DECpack. Alternatively, boots 
System Generation DECpack, LOGIN under account [1,1], 
PIP under DOS to print the file. 



s pr 
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SOFTWARE PRODUCT 
RSTS/E 2780 EMULATOR 



COMPONENT 

2780 PATCHES 



SUBPROGRAM OR ADDITIONAL INFORMATION 



NEW 

^1 



REPLACEMENT ARTICLE 



VERSION 
V06A-02 



VERSION 

N/A 



SEQUENCE 
8.2.3* 



PAGE 
1 0^4 



ORIGINAL DATE 
January 1976 
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On the first or second page of the RSTS map under the heading 
"Program Section Allocation Synopsis" find the sections 
<Z.USER> and <Z.TAP> . Record the first number to the right 
of the section name (first column of numbers). 



[Z.USER] = 



[Z.TAP] 



Bootstrap the RSTS/E system disk normally to load the 
Initialization Code into memory. Then use the PATCH option of 
the INIT code to install the patch as shown below. 



OPTION 

MODULE 

BASE A 

OFFSET 

MODULE 

RSTS 

RSTS 

RSTS 

RSTS 

RSTS 

RSTS 

RSTS 

RSTS 

RSTS 

RSTS 

RSTS 



: PATCH 

NAME? RSTS 
DDRESS? [Z. 



ADDRESS? 
BASE 
[Z.TAP] 



1 



[Z. 
[Z. 
[Z. 
[Z, 
[Z. 
[Z, 
[Z, 
[Z, 
[Z, 
[Z, 



TAP] 
TAP] 
TAP] 
TAP] 
TAP] 
TAP] 
TAP] 
TAP] 
TAP] 
TAP] 



TAP] 

170 

OFFSET 

001 170 

001 172 

001 174 

001 176 

001200 

001202 

001204 

001206 

001210 

001212 

001214 



OLD 

000040 

000014 

000562 

032762 

002000 

000006 

001556 

032762 

000040 

000014 

001404 



NEW? 

? 000020 

000010 

<LF> 

<LF> 

<LF> 

<LF> 

<LF> 

<LF> 

000020 

000010 

tc 



No Change 
No Change 
No Change 
No Change 
No Change 
No Change 



CONTROL/C Exit 



SOFTWARE PRODUCT 

RSTS/E 2780 EMULATOR 


VERSION 
V06A-02 


COMPONENT 

2780 PATCHES 


VERSION 

N/A 


SUBPROGRAM OR ADDITIONAL INFORMATION 


SEQUENCE 
8,2.3* 


PAGE 
2 OF 4 


NEW REPLACEMENT ARTICLE 


ORIGINAL DATE | 


HD e: 


Januar 


Y 1976 
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OPTION: PATCH 
MODULE NAME ? RSTS 
BASE ADDRESS ? [Z.TAP] 
OFFSET ADDRESS? 3654 
MODULE BASE OFFSET 

RSTS [Z.TAP] 003654 

RSTS [Z.TAP] 003656 



OLD 

074000 

000010 



NEW ? 

? 074020 

? to 



CONTROL/C Exit 



OPTION: PATCH 
MODULE NAME ? RSTS 
BASE ADDRESS ? [Z.USER] 



OFFSET 


ADDRESS ? 


002012 










MODULE 


BASE 


OFFSET 


OLD 


NEW ? 




RSTS 


[Z.USER] 


002012 


012701 


? 


001421 




RSTS 


[Z.USER] 


002014 


[AAAAAA] 


7 


012701 


Old Contents Variable 


RSTS 


[Z.USER] 


002016 


012700 


7 


[AAAAAA] 


Use Previous Old 


RSTS 


[Z.USER] 


002020 


[BBBBBB] 


7 


012700 


Old Contents Variable 


RSTS 


[Z.USER] 


002022 


020221 


? 


[BBBBBB] 


Use Previous Old 


RSTS 


[Z.USER] 


002024 


001404 


7 


030221 




RSTS 


[Z.USER] 


002026 


005305 


7 


001003 




RSTS 


[Z.USER] 


002030 


100374 


? 


077503 




RSTS 


[Z.USER] 


002032 


000167 


7 


to 


CONTROL/C Exit 



SOFTWARE PRODUCT 

RSTS/E 2780 EMULATOR 


VERSION 
V06A-02 


COMPONENT 

2780 PATCHES 


VERSION 
N/A 


SUBPROGRAM OR ADDITIONAL INFORMATION 


SEQUENCE 
8.2.3* 


PAGE 
3 °' 4 


NEW REPLACEMENT ARTICLE 


ORIGINAL DATE 
January 1976 
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OPTION: PATCH 
MODULE NAME ? RSTS 
BASE ADDRESS ? [Z.USER] 



OFFSET 

MODULE 

RSTS 

RSTS 

RSTS 

RSTS 

RSTS 

RSTS 

RSTS 

RSTS 

RSTS 

RSTS 

RSTS 



ADDRESS ? 
BASE 

[Z.USER] 
[Z.USER] 
[Z.USER] 
USER] 
USER] 
USER] 
USER] 
USER] 
USER] 
USER] 
USER] 



[Z. 
[Z. 
[Z. 
[Z. 
[Z, 
[Z, 
[Z, 
[Z 



2632 

OFFSET 

002632 

002634 

002636 

002640 

002642 

002644 

002646 

002650 

002652 

002654 

002656 



OLD 

040000 

000200 

000400 

040400 

000000 

?????? 

?????? 

[XXXXXX] 

?????? 

[YYYYYY] 

979999 



NEW ? 
? 000400 
? <LF> 
? 040000 
? <LF> 
? <LF> 
? <LF> 
? <LF> 
? <LF> 
? <LF> 
? [XXXXXX] 
? TC 



No Change 

No Change 

No Change 

Old Contents Variable 

No Change 

[XXXXXX] used below 

No Change 

[YYYYYY] used below 

CONTROL/C Exit 



OPTION: PATCH 
MODULE NAME ? RSTS 
BASE ADDRESS ? [Z.USER] 
OFFSET ADDRESS ? 2650 
MODULE BASE OFFSET 
RSTS [Z.USER] 002650 
RSTS [Z.USER] 002652 



OLD NEW ? 

[XXXXXX] ? [YYYYYY] From above 

?????? ? tc CONTROL/C Exit 



OPTION: PATCH 
MODULE NAME ? RSTS 
BASE ADDRESS ? [Z.USER] 
OFFSET ADDRESS ? 003770 
MODULE BASE OFFSET 
RSTS [Z.USER] 003770 
RSTS [Z.USER] 003772 



OLD 

177020 

001002 



NEW ? 

? 177542 

? t C 



CONTROL/C Exit 



OPTION 



SOFTWARE PRODUCT 

RSTS/E 2780 EMULATOR 



COMPONENT 

2780 PATCHES 



SUBPROGRAM OR ADDITIONAL INFORMATION 



NEW 



REPLACEMENT ARTICLE 



VERSION 

V06A-02 



VERSION 
N/A 



SEQUENCE 

8.2.3* 



PAGE 
OF 



ORIGINAL DATE 

January 1976 
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Receive Error Messages and Crashes Caused by the 2780 Package 



When a delay occurs in processing received data, 
Z.USER is unable to Inform Z.TAP of the proper 
acknowledge. If three seconds lapse, the transmitting 
station requests a response. Since Z.USER has not 
notified Z.TAP of the acknowledge, Z.TAP sends the 
previous response. The transtsltting side then resends 
the last block, which is still being processed by the 
receiver. This can result in duplicate records, a kernel 
mode trap through four (which will crash the system) , a 
Line Disconnect error message, or a Remove System Nonresponding 
error message. The problem is corrected by the following patch. 



PROCEDURE: 

1. This is a patch to the BISYNC protocol module 
(Z.TAP) in the 2780 handler. It should be 
installed on all RSTS/E V05A-02 systems which are 
configured for the 2780 package. 
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RSTS/E, the 
monitor. I 



isting 
during 

avail 
t be 

System 
stribut 

DECpa 
e map f 
om the 
System 
f the 



of the RS 
System G 
able at 
printed 

Generat 
ion) or 
ck ( RK 
rom tape 

LICIL 
Generatio 
media is 



TS load map. 
eneration if 
that time 
from the 
ion time 
from 
distribut ion) . 
media, print the 



This map 

a line 

Ot herwise , 

LICIL tape 

(DECtape or 

the System 

If 

file 



tape using PIP under 

n Monitor, or any DOS 

DECpack, use PIP with 



SOFTWARE PRODUCT 
RSTS/E 2780 EMULATOR 


VERSION 
V5B and Later 


COMPONENT 
2780 PATCHES 


VERSION 

N/A 


SUBPROGRAM OR ADDITIONAL INFORMATION 


SEQUENCE 

8.2.4* 


PAGE 
1OF4 


NEW REPLACEMENT ARTICLE 


ORIGINAL DATE 
February 1976 
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the /DOS switch under RSTS/E to print the file 
RSTS.MAP from account [1,1] on the System 
Generation DECpack. Alternatively, bootstrap the 
System Generation DECpack, LOGIN under account 
[1,1], and use PIP under DOS to print the file. 

On the first or second page of the RSTS map under 
the heading "Program Section Allocation Synopsis" 
find the tag <Z.TAP> and <Z.SCIP>. Record the 
first number to the right of the section name 
(first column of numbers). 

[Z.TAP] = 



[Z.SCIP] 



There is a small amount of dead space between the 
parity memory trap code and the system stack area. 
Part of this area is used for this patch. The 
monitor's normal patch area is not used. 



SOFTWARE PRODUCT 

RSTS/E 2780 EMULATOR 


VERSION 

V5B and Later 


COMPONENT 

2780 PATCHES 


VERSION 
N/A 


SUBPROGRAM OR ADDITIONAL INFORMATION 


SEQUENCE 
8.2.4* 


PAGE 
2 0'=4 


NEW REPLACEMENT ARTICLE 

:Z2 CD 


ORIGINAL DATE 

February 1976 
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5. Bootstrap the RSTS/E system disk normally to load 
the initialization code into memory. Then use the 
patch option of the INIT code to install the patch 
as shown below. 



OPTION: PATCH 
MODULE NAME? RST3 
BASE ADDRESS? [Z.TAP] 
OFFSET ADDRESS? 3'»0 
MODULE BASE OFFSET 
RSTS [Z.TAP] 000310 
RSTS [Z.TAP] 000342 
RSTS [Z.TAP] 0003'<'* 



OLD 

042762 
000020 
000012 



NEW? 

? 000137 

? 001650 

? tC CTRL/C 



Exit 



OPTION: PATCH 
MODULE NAME ? RSTS 
BASE ADDRESS ? [Z.TAP] 



OFFSET 

MODULE 

RSTS 

RSTS 

RSTS 



ADDRESS ■ 
BASE 
[Z.TAP] 
[Z.TAP] 
[Z.TAP] 



3222 

OFFSET 
003222 
003224 
003226 



OLD 

004767 
?????? 
000207 



NEW? 

? 004737 

? 001670 

? Tc CTRL/C 



Exit 



OPTION: PATCH 
MODULE NAME ? RSTS 
BASE ADDRESS ? [Z.TAP] 
OFFSET ADDRESS ? 6374 
MODULE BASE OFFSET 
RSTS [Z.TAP] 006374 
RSTS [Z.TAP] 006376 
RSTS [Z.TAP] 006400 



OLD 

032762 
000400 
000006 



NEW? 

? 000137 

? 001704 

? tc CTRL/C 



Exit 



SOFTWARE PRODUCT 

RSTS/E 2780 EMULATOR 


VERSION 

V5B and Later 


COMPONENT 

2780 PATCHES 


VERSION 
N/A 


SUBPROGRAM OR ADDITIONAL INFORMATION 


SEQUENCE 
8.2.4* 


PAGE 
3 OF 4 


NEW REPLACEMENT ARTICLE 

CZ3 CH 


ORIGINAL DATE 
February 1976 
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OPTION 

MODULE 

BASE A 

OFFSET 

MODULE 

RSTS 

RSTS 

RSTS 

RSTS 

RSTS 

RSTS 

RSTS 

RSTS 

RSTS 

RSTS 

RSTS 

RSTS 

RSTS 

RSTS 

RSTS 

RSTS 

RSTS 

RSTS 

RSTS 

RSTS 

RSTS 

RSTS 

RSTS 

RSTS 

RSTS 

RSTS 

RSTS 

RSTS 

RSTS 



: PATCH 
NAME ? R 

DDRESS ? 
ADDRESS 
BASE 
000000 
000000 
000000 
000000 
000000 
000000 
000000 
000000 
000000 
000000 
000000 
000000 
000000 
000000 
000000 
000000 
000000 
000000 
000000 
000000 
000000 
000000 
000000 
000000 
000000 
000000 
000000 
000000 
000000 



STS 




1650 

OFFSET 

001650 

001652 

001654 

001656 

001660 

001662 

001664 

001666 

001670 

001672 

001674 

001676 

001700 

001702 

001704 

001706 

001710 

001712 

001714 

001716 

001720 

001722 

001724 

001726 

001730 

001732 

001734 

001736 

001740 



OLD 

000000 

000000 

000000 

000000 

000000 

000000 

000000 

000000 

000000 

000000 

000000 

000000 

000000 

000000 

000000 

000000 

000000 

000000 

000000 

000000 

000000 

000000 

000000 

000000 

000000 

000000 

000000 

000000 

000000 



NEW? 

? 042762 

000020 

000012 

042762 

000004 

000010 

000137 

[Z.TAP]+346 

004737 

[Z.SCIPj+1156 

052762 

000004 

000010 

000207 

032762 

000400 

000006 

001002 

000137 

[Z.TAP]+6420 

032762 

000004 

000010 

001402 

000137 

[Z.TAP]+6404 

000137 

[Z.TAP3+7144 
TC CTRL/C Exit 



SOFTWARE PRODUCT 

RSTS/E 2780 EMULATOR 


VERSION 

V5B and Later 


COMPONENT 

2780 PATCHES 


VERSION 

N/A 


SUBPROGRAM OR ADDITIONAL INFORMATION 


SEQUENCE 

8.2.4* 


PAGE 

4 OF 4 


NEW REPLACEMENT ARTICLE 


ORIGINAL DATE | 


nn en 


Februar 
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IMPROPER ZEROING OF LARGE BUFFER 



PHOBLKM: 'wh^n zeroing a larg" buffer to b° us°d as a line tabl°, 

the 2780 loops once two often and zeroes the location directly in 

front of the buffer. If this location is the system mapping 
register, the system will crash. 



L)j.aPusiiION : This patch should be installed on all VO6A-02 
systems which are configured with the 2780 Handler. 

1. Obtain a listing of the RSTS load map. This map was printed 
during System Generation if a line printer was available at 
that time. Otherwis°, the map must be printed from the LICIL 
tape created at System Generation time (DECtap° or magtape 
distribution) or from the System Generation DECpack ( RK 
distribution). If obtaining the map from tape media 
the file RSTS. MAP frot '' ----- ■ • 




On the first or second pag° of the RSTS map und°r th^ heading 
"Program Section Allocation Synopsis" find the tag <Z.SCIP>. 
Record the first number to the right of the section name 
(first column of numbers). 

[Z.SCIP] = 



3. Bootstrap th*^ RST-S/fi system disk normall" to load th^ 
Initialization Code into memory. Th°n use the PATCH option 
of the INIT code to install the patch. 

OPTION: PATCH 

MODULE NAME? RSTS 

BASE ADDRESS? [Z.SCIP] 

OFFSET ADDRESS? 1440 

MODULE BASE OFFSET OLD NEW? 

HSTS [Z.SCIP] 001440 103375 ? 101375 

HSTS [Z.SCIP] 001442 010263 ? tc CTRL/C Exit 

OPTION: 

RSTS/E 2780 EMULATOR V05C-01, V06A-02 Qpn r ? r^* 

2780 PATCHES 1 of 1 
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RUNNING THE 2780 ON A DUPll INSTEAD OF A DUll 



PROBLEiM: Th-i RSTS/E 2780 must -nak*? 3 s«ts of chan£^>?s to th-:* in- 
t^jrrupt s-srvice routine in order to run with a DUP11 instead of a 
DU1 1 . 

The DUP11 is a recently announced synchronous communications in- 
terface which is capable of both character (DDCMP or BISYNC) and 
bit (SDLC) oriented communications. The released version of the 
RT11 2780 supports the DUPll as well as the DP11 and DU11. The 
RSTS/E 2780 will not have a special DUPll version but the DUll 
version can be easily patched to run using a DUPll. similar patches 
are available for the RSX-11 2780 packages. 

DISPOSITION: This patch should be installed on any V06A-02 sys- 
tems which are configured with the 2730 Handler for a DUll and 
ai-e actually being r-un with a DUP11. 

1. Obtain a listing of the RSTS load map. This map was 
printed during System Generation if a line printer was 
available at that time. Otherwise, the map must be 
printed from the LICIL tape created at System Generation 
time (DECtape or magtape distribution) or from the Sys- 
tem Generation DECpack (RK distribution). If obtaining 
the map from tape media, print the file RSTS. MAP from 
the LICIL tape using PIP under RSTS/E, the System Gener- 
ation monitor, or any DOS monitior. If the media is 
DECpack, use PIP with the /DOS switch under RSTS/E to 
print the file RSTS. HAP from account [1,1] on the System 
Generation DECpack or bootstrap the System Generation 
DECpack, LOGIN under account [1,1], and use PIP under 
DOS to print the file. 



RSTS/E 2780 EMULATOR V06A-02 
2780 PATCHES 



Seq 8.2.6* 
1 of 2 
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2. On th-i first or s-^cond page of the RSTS map under the 

heading "Program Section Allocation Synopsis" find the 

tag <Z.ISR> and record the first number to the right of 
the section name (first column of numbers). 

r 7 T'^'? 1 - 



3. Bootstrap the RSTS/E system disk normally to load the 
initialization code into memory. Then use the patch op- 
tion of the INIT code to install the patch as shown 
below. 



OPTION: PATCH 

MODULE NAME? RSTS 

BASE ADDRESS? [Z.ISR] 

OFFSET ADDRESS? HO 

MODULE BASE OFFSET OLD NEW? 

RSTS [Z.ISR] 000040 036062 ? 101062 

RSTS [Z.ISR] 000042 000000 ? tc CTRL/C Exit 

OPTION: PATCH 

MODULE NAME? RSTS 

BASE ADDRESS? [Z.ISR] 

OFFSET ADDRESS? 726 

MODULE BASE OFFSET OLD NEW? 

RSTS [Z.ISR] 000726 112762 ? 012762 

RSTS [Z.ISR] 000730 000377 ? 000777 

RSTS [Z.ISR] 000732 000006 ? tc CTRL/C Exit 

OPTION: PATCH 

MODULE NAME: RSTS 

BASE ADDRESS? [Z.ISR] 

OFFSET ADDRESS? 1240 

MODULE BASE OFFSET OLD NEW? 

RSTS [Z.ISR] 001240 112763 ? 012763 

RSTS [Z.ISR] 001242 000377 ? 000777 

RSTS [Z.ISR] 001244 000006 ? tC CTRL/C Exit 

RSTS/E 2780 EMULATOR V06A-02 Seq 8 2 6* 

2780 PATCHES 2 of 2 " 
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2780 TIMING OUT IN RECEIVE MODE 

The 2780 Package goes into a hang condition and "times out" after 
60 seconds. The program aborts with a REMOTE SYSTEM NOT RESPONDING 
error message. 

This patch should be installed on any V06A-02 systems which are 
running the 2780. ***This patch assumes and requires the previous 
insertion of the patch outlined in the previous Software Dispatch 
article Seq 8.2.2.*** 

1. Obtain a listing of the RSTS load map. This map was printed 
during System Generation if a line printer was available at 
that time. Otherwise, the map must be printed from the LICIL 
tape created at System Generation time (DECtape or magtape 
distribution) or from the System Generation DECpack (RK dis- 
tribution). If obtaining the map from tape media, print the 
file flSTS.MAP from the LICIL tape using PIP under RSTS/E, the 
System Generation monitor, or any DOS monitor. If the medium 
is DECpack, use extended PIP under RSTS/E with the /DOS 
switch to print the file RSTS. MAP from account [1,1] on the 
System Generation DECpack. Alternatively, bootstrap the Sys- 
tem Generation DECpack, LOGIN under account [1,1], and use 
PIP under DOS to print the file. 

2. On the first or second page of the RSTS map under the heading 
"Program Section Allocation Synopsis" find the tag <Z.USER>. 
Record the first number to the right of the section name 
(first column of numbers). 

[Z.USER] = 



Bootstrap the RSTS/E system disk normally to load the Ini- 
tialization Code into memory. Then use the PATCH option of 
the INIT code to install the patch. 



RSTS/E 278 EMULATOR V06A-n2 Seq 8,2. 

2780 PACKAGE 1 of 2 



2T4 



OPTION: 


PATCH 










MODULE 


NAME? R3T, 


s 








BASE ADDRESS? [Z 


.USER] 








OFFSET 


ADDRESS? 


3270 








MODULE 


BASE 


OFFSET 


OLD 


NEW? 


RoTS 


[Z. USER] 


003270 


032701 


7 


000137 


RSTS 


LZ.USER] 


003272 


140000 


9 


001740 


R.STS 


[Z.USERj 


003271 




■p 


tc CTRL/C Exit 


OPTION: 


PATCH 










MODULE 


NAME? RSI, 


S 








BASE ADDRESS? 










OFFSET 


ADDRESS? 


1740 








MODULE 


BASE 


OFFSET 


OLD 


NEW? 


fiSTS 


000000 


001740 


000000 


7 


032701 


RSTS 


000000 


001742 


000000 


7 


140000 


RSTS 


000000 


001744 


000000 


7 


001005 


RSTS 


000000 


001746 


000000 


7 


032701 


RSTS 


000000 


001750 


000000 


7 


030000 


RSTS 


000000 


001752 


000000 


7 


001002 


RSTS 


000000 


001754 


000000 


7 


000137 


RSTS 


000000 


001756 


000000 


7 


[Z.USER+3312] 


RSTS 


000000 


001760 


000000 


7 


000137 


RSTS 


000000 


001762 


000000 


7 


'Z.USER+3276] 
"C CTRL/C Exit 


RSTS 


000000 


001764 


000000 


? 


OPTION: 
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Seq 8.2.7* 
2 of 2 
July 1976 



275 



Incorrect Build Directions for Nine-Track Magtape Distribution of 
SORT 



PROBLEM: 

The build directions given in the SORT User's Guide (DEC-11-OP^GA.-A-D) 
do not work with nine- track magtape distribution of SORT. 



DISPOSITION: 

There is an error in the RSTS-11 SORT package nine- track magtape dis- 
tribution kit {DEC-11-0RS0A-B-MA9) . According to the build directions 
in the SORT Manual, the SORT programs are under account [1,2]. This 
is false, since they are under account [1,24]. To correct this error 
the proper library building sequence is shown below; 

OLD MT0: [1,24] SORT 

READY 



COMPILE 


$SORT<40> 


READY 




OLD MT0: 


[1,24]XQWIK 


READY 




COMPILE 


$XQWIK<40> 


READY 




OLD MT0: 


[1,24]SQWIK 


READY 




COMPILE 


$SQWIK<40> 



277 



SOFTW/'^e PRODUCT 

RSTS-11 SORT 


VERSION 
V07 


COMPONENT 

Notes/Proqramminq Hints 


VERSION 
N/A 


SUBPROGRAM OR ADDITIONAL INFORMATION 

9-Track Magtape Distribution 


SEQUENCE i 

a . 1 . 1 


PAGE 
1 OF 2 


NEW REPLACEMENT ARTICLE 


ORIGINAL DATE 1 


CE 







SOFTWARE DISFATCH 


RSTS/E 


November 1974 



Tnrnrreet Build Directions for Nine-Track Magtape Distribution of SORT 



READY 

OLD MT0:[1,24]MQWIK 

READY 

COMPILE $MQWIK<40> 

READY 

OLD MT0:[l,24lOQWIK 

READY 

COMPILE $OQWIK<40> 

READY 

OLD MT0:[1,24]KEYDMP 

READY 

COMPILE $KEYDMP<40> 

RUN$PIP 

PIP - RSTS V05B-24... 

*SORT.HLP<40><MT0: [ 1,24] SORT. HLP 

*+Z 
READY 



The error wi 



11 be corrected in a future release of SORT. 



SOFTWARE PRODUCT 
RSTS-11 SORT 


VERSION 

V07 


COMPONEN-' 

General Notes/Programming Hints 


VERSION 

N/A 


SUBPROGRAM OR ADDITIONAL INFORMATION 

9-Track Magtape Distribution 


SEQUENCE • 
9.1.1 


PAGE 
2 OF 2 


I^EW REPLACEMENT ARTICLE 


ORIGINAL DATE 1 


n^ □ 




1 
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PARTIAL KEY EXTRACTION FEATURE OF SORT DOES NOT FUNCTION PROPERLY 
(SPR 11-4157 GH) 



PROBLEM: The partial key extraction feature of SORT does not 
function properly. 



PREREQUISITES: SORT.BAS V07-03 (includes Patches 1 and 2) and 
XQWIK.BAS V07-03. 



DISPOSITION: In the source file SORT.BAS, retype the following 
lines or edit the underlined additions and modifications into the 
existina lines: 



Sl^l-l 



V t K S HI N 7 



KlUI 04 



t / ^ / / 7 S 



Mixr-flHO, MA.SS, 01754 
I I I I 

lb h' R I M " 5 (3 w T V 7 - 4 - " ).$: 

Cl% = o*: T/% = -U: h%=ioo*.: >7%,t-7%=o% 

IPPir r Ht-ADKR *. If. n ^ lAGb 
2hO KS = f' i.H?( I S ) : K$ = LF,F T(^$,^%♦4%) : h% = i'f,Cb%): 

KV%=p%(iOi)-2'%: ns = xs; i$ = PS(o%): 
IPtRiui, Kj^rH-ACTKM'C - btncxf:!) riM.v 



Recompile the resulting source program. 



RSTS-11 SORT V07 
SORT.BAS V07-03 



Seq 9.2.1* 
1 of 1 
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SORT RESTRICTS THE LENGTHS OF FILE SPECIFICATIONS (SPR 11-4261 GH) 



PROBLEM: SORT restricts the lengths of file specifications unneces- 
sarily. The correction given here will permit longer specifications 
and, therefore, will permit the use of logical device names. 

PREREQUISITES: SORT.BAS V07-04 (includes patches 1, 2, and 3). 

DISPOSITION: In the source file SORT.BAS, retype the following 
lines or edit the underlined additions and modifications into the 
existing lines : 



lb 



160 



224 



! ! SOhl 



I I 
t I 



yF:HvSio-i 07 



KPIT Ob 



/ / 1 / 7 '3 



Ci'PVKlCHr 1972, /3,74,7b t.naXAL; KOUl P'-.f-M CONPiJh A'l 1 f.f; 

MAtNARO, f--ASS. Oilbi 

PPIKT "pOPr \I01-0S - "XS: 

Cl% = u?,: r/% = -l*: h%=100%: X7%,S7% = U% 

IPPI'Jl HEAUEri ^ li-.n FLAGS 



JilLELLAS ) > 1 2 7 % GOTO 9H0 



301 xs=t'rii'sf IS) : P$(0%)=ti$; Guui 310 

830 rt"f fr.:HS(XS): 

ru^ KHPnp euro 83b: ophji. xs as i- i\,t. lo^; 

UfM t'hPop GOTO H36: Gtl it 10% PfCUPD 1% 
Recompile the resulting source program. 



RSTS-11 SORT V07 
SORT.BAS V07-04 (P4) 



Seq 9.2.2* 

1 of 1 
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KEYDMP Will Not Ret\irn Properly to SORT 



PROBLEM: 

If the SORT modules are stored on some arbitrary account for 
general use, then KEYDMP will not return properly to SORT. 



1 ! ! 

I I I 

I I I 

I ) I 



15 



1 ' ' 

.1, m m 

I I I 



1 ' ' 
I I I 



^000 
3 2 ■) 



SOLUTION: 

In SORT.BAS, make the underlined change in line 126 and update 
lines 1 and 15 to indicate EDIT 03. 

Si1RT V'FPSJOf. 07 EDil 03 01/03/75 

COPyplGHT 1972,73,74,7?5 DIGITAL KQUIPMFNT CORI-MJHATIGN 

MAY?>iAFU, MASS, U17b4 



GJH/w'KL 



PRlnT "SOFT V07-G3 - "X$: ri%=0%: T7%=-1%: H%=100%: X7%,S7%=0% 

!P^^,lr••■i' hfciADKP & IrJiT HAGS 

K,S = P9$ + D9S+rVT%S(r>%) : X$=:5YS(CnH$(8%)+K$) : 

C H A n K 9 $ 7 7 7?, 

ICHAl.v- TO KF.yL'i-P UTILIiy 



In KEYDMP. HAS, make the underlined change in line 32000 and update 
lines 1 and 2000 to indicate EDIT 02: 

EOrr 0? 01/03/75 GJH/WKL 



K,h;Yf:''P vk;psio^ 07 



CnPYP'TGHT 1972,73,74,7b DIGITAL EOUIPr-'FlMT CUHPORATION 

MAY'^^ APi.i, KASS. 01754 

PHI'iT " Kf-yUHF V07-02": RFTUPN IPHIMT HFADKH 

0!i tPROR GOTO 0: CLnSE 1,2: IF S7% = 0% THKM 32767 
fc:LSE r;$ = SYS(ChHS(7%)) : .)i^= psTt^ ( 1 ^ . K S . r HP S n 3?;) 1 ! 
K9$ = f,FFT ( KS , J?;-U ) : H''n = CVTS% (MI D (K S , J%+1% , 2%) ) : 

C'JAIt> R9$ R9% 

iRFTUHi. TO CALt;FP IF CALLKD 
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SOFTW/ARE PRODUCT 
RSTS-11 SORT 


VERSION 
V07 


COMPONENT 
KEYDMP 


VERSION 
V07-01 


SUBPROGRAM OR ADDITIONAL INFORMATION 


SEQUENCE 
9.3.1 


PAGE 

1 OF 1 


NEW/ REPLACEMENT ARTICLE 
X 


ORIGINAL DATE 



SORWARE DISBMCH 


RSTS/E 


April 1975 



Fatal BASIC-PLUS Errors in MQWIK 



PROBLEM: 



Certain file allocation problems can cause fatal BASIC-PLUS errors 
in module MQWIK or may be reported incorrectly. 



SOLUTION : 

In SORT.BAS, add the underlined statement below to line 492; 



492 P%(0%)=-P%(0%) 
PRINT "SORTING 



etc. 



Update lines 1 and 15 to indicate EDIT 02. The changed lines will 
then be: 



11!! 




\b 




492 





S'lWT 



Vh:H8TP^ 7 



FD 11 0? 



01/02/75 



GJ»I/'.\'K1, 



CMPyPIGHT nr/2,73,74,7b DlGDAL FOIl IPf<t:MT CUPPOPATION 

^:AY^AP!;, N^AS5. 01754 

PRIM "SOhT V07-n2 - "xs: C1%=0%: T7%=-1%: H%=100%: X7%,S7%=0% 
IPPJi-T HKADKP S, PUT FLAGS 

P%(ol)=-p%(o%) : 

D D r r -7 " c T: i) I T y- (■ l o u r-, l; - h • — t -^j q. . 

IF P?. (0?-)<500% THF."; 19^0 

FLSK IF P%(0%)<1000% TPt.ii 1931 

K!;SF. 19b0 

l/.flRK FIJF GPFr. , KF GPF!^,:)F uPe,'-) 

In MQWIK. BAS, add the underlined statement below to line 160 after 
the ON ERROR GOTO: 



160 FOR 



etc. 



ON ERROR GOTO 32705 ; I8%=0%; 
PUT ... etc. 



SOFTWARE PRODUCT 
RSTS-11 SORT 


VERSION 
V07 


COMPONENT 
MQWIK 


VERSION 
V07-01 


SUBPROGRAM OR ADDITIONAL INFORMATION 


SEQUFNCE 
9.4.1 


PAGE 
1 OF 2 


NEW REPLACEMENT ARTICLE 
X 


ORIGINAL DATE 
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SOFTWARE DISBMCH 


RSTS/E 


April 1975 



Fatal BASIC-PLUS Errors in MQWIK 



Update lines 1 and 40 to indicate EDIT 02. The modified lines will 
then be: 



U 
I t 

I I 

♦ • 

I ! 

40 
160 



VF'.PSJOi^ 7 



KDIT 2 



01/02/75 



GJH/WKL 



CQPVFaGHT 1972,73,74,75 DIGITAL tQU IPMhii-lT COHPORATIOW 

MAYNARD, "ASS. 01754 

p^a^.T " mqwik v07-02"; if t7% 

KOH I%=0% TO tO%: P%Cl%*5% + 14%)=I,%CI%)*P%n%»b%+15%) : 

V2%=I%*5%+12%: GOSUl* 29560: NFJXT 1%: 

09$ = SYS(CHRS(6%) + CHF$(-8%)-t-CHR$(P%(18%))): 

ON FFPUH GOTO 32705; n<%=0%: 

PUT 9P%(n%) PECOHD CVTS%Cf'UO(09$,H%,l%)+Min(U9S,7%,1%) ) : 

OiJ FPROP GO'IC) 0: 

lOPF'v i. ppii-AL) OC 



NOTE: Only Version V07-01 of RSTS-11 SORT is now being supported. 



SOFTWARE PRODUCT 
RSTS-11 SORT 


VERSION 
V07 


COMPONENT 
MQWIK 


VERSION 

V07-01 


SUBPROGRAM OR ADDITIONAL INFORMATION 


SEQUENCE 

9.4.1 


PAGE 
2 OF 2 


NEW REPLACEMENT ARTICLE 
X 


ORIGINAL DATE 
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SOFTWARE DISPATCH 


RSTS/E 


December 1974 



Extra Block in Output File When SORTing Type 1 File Without Header 



PROBLEM: 

When SORTing a type 1 file without a header and the last block is full, the 
reordered output file has one extra block with junk in it, (Type 1 files with 
headers work correctly.) 

SOLUTION: 

In the program "OQWIK" at line 1200 after "ELSE," insert the underlined 
code below in place of the distributed code. 

1200 Z0$="": Z0$=Z0$+CHR$ (0%) FOR I%=1% TO 32%: Z0%=LEN (Z0$) : 
ON ERROR GOTO 32735: IF B%<0% THEN 1250 

ELSE IF B%>1% THEN J7%=1% ELSE J7%=0% 

1201 Vl%=_(P%(0%)-J7%)_/P%(15%)-P%(14%)/P%(15%)+2%: 

IP V1%>0% THEN PUT #P%(13%) RECORD Vl% I FORGET SMALL FILES 

It is recommended that lines 1 and 200 also be updated to indicate that 
the modified OQWIK is considered to be EDIT 02. 



SOFTWARE PRODUCT 

RSTS-11 SORT 


VERSION 
V07 


COMPONENT 
OQWIK 


VERSION 
V07-01 


SUBPROGRAM OR ADDITIONAL INFORMATION 


SEQUENCE 
9.5.1 


PAGE 
1 °^ 1 


NEW REPLACEMENT ARTICLE 


ORIGINAL DATE | 


d CZ 
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RSTS/E 


April 1975 



SQWIK Destroys Key File Header 



PROBLEM: 



When no records require sorting, SQWIK destroys the key file 
header. 



SOLUTION: 

In SQWIK. BAS, add the underlined modifier clause to line 29510: 

29510 PUT ... )+l% UNLESS P%(V2%)<0% 
: RETURN 

Update lines 1 and 15 to indicate EDIT 02. 

The modified lines will then be: 



VERSION 07 



EDIT 02 



01/02/75 



GJH/WKL 



1M!M SQWIK 
I I I I I I 

liiiij COPYRIGHT 1972,73,74,75 DIGITAL EQUIPMENT CORPORATION 

Unil MAYNARD, MASS. 01754 

111111 

15 PRINT " SQWIK V07-02"; IF T7% 

29510 PUT «P%(V2%*1%) RECORD P%(V2%)/P%(V2%+3%)+l% UNLESS P%(V2%)<0% 
: RETURN 



SOFTWARE PRODUCT 
RSTS-11 SORT 


VERSION 
V07 


COMPONENT 

SQWIK 


VERSION 
V07-01 


SUBPROGRAM OR ADDITIONAL INFORMATION 


SEQUENCE 
9.6.1 


PAGE 
1 OF 1 


NEW REPLACEMENT ARTICLE 

ID 


ORIGINAL DATE 
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SOFTWARE DISBMCH 


RSTS/E 


April 1975 



SQWIK Loops or Uses Undue Amounts of Time to SORT 



PROBLEM: 

When a file contains many identical records (keys) , SQWIK may 
get stuck in a loop or generally use undue lengths of time to 
sort. 



I I I 
I I 
I I 



I 



MO GOT 



2)2?^^ I, 



SOLUTION: 

In SQWIK. BAS, add the underlined statement below to line 340: 

340 GOTO 200 IF Y%=S%(S0%) ; 
S%(S0%+1%)= ... etc. 

And alter line 29220 as underlined below: 

29220 DEF FNG$( ... :FNG$=V2$+"" : FNEND 

Update lines 1 and 15 to indicate EDIT 03. 

The modified lines will then be: 

S,;-;(K VKHSI'^r 07 KD'll 03 01/02/75 GJH/wKL 

CiipyHlGhT 197:^,73,74,75 r;I.',;,T.TAL. tOii J FiVKf'iT CfJ^^PORATIOM 

''■Ayf>'AHr), '-ASS. 01754 

PHl-i1 " SC'^»'It< \-01-C.-i"; IF 17% 

:i 2t)(! Ih Y% = S%(SO!fe) 

: .s%(so^ + i%)=S'*cso?s) : s?(S0''O = y% : so%=so% + i% : gcito 120 

i S''r5Tnii'!> '/ ? f' i'^ PAr'''lT [ii:,^ FOP i HF 01,0 (ihF: 
i-:F F- <"$( Vl%,\/2%) : Gf.SlJt^ /y410: F^.C;s = VV$ t"" : Fi'JF^D 



SOFTWARE PRODUCT 
RSTS-11 SORT 


VERSION 
V07 


COMPONENT 
SQWIK 


VERSION 

V07-02 


SUBPROGRAM OR ADDITIONAL INFORMATION 


SEQUENCE 
9.6.2 


PAGE 
1 OF 1 


NEW REPLACEMENT ARTICLE 


ORIGINAL DATE 


CH 
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RSTS/E Software Dispatch 
May 197 6 



ALGORITHM PROBLEM (SPR 11-5037 GH) 



PROBLEM: SQWIK is unable to sort a file in which most of the records 
are in proper sequence. 



DISPOSITION: Make the following changes to SQWIK.BAS, including the 
correction of the edit level. 



COPYf-lGHT 1972. 73, 74, 7b, 7h 



7h/0 3/1d 

DIGITAL FOUIP^'KUT CUkPfjR AT ] nu 
I'lAY 'JAf'n, !-ASS. 01754 



IS FMt-1 " 3QV.1K V07-04"; IK t7% 

120 r;nT'"i fco ik sO*<i)?; : x%=s%C60%-i%) : Y%=6%(S0%) 

1 JI'MP iF L'UjK ok whul.r HIOCK, (riH.'.S SKT I.IMTS 
200 S0% = pn%-2% : GnVQ 120 : PEPUP] fifiE PUHTtD SKGMtlvT & HO SDN'E M'lkK 

.UO X* = S%(vSO%-l%) \ IF S%(SO%)-V% > Y%-X% THLt- S% ( S0%- 1 % ) =Y% \ fiDTC; 347 
343 X%=Y% \ Y^=S%(SO%) S S%(SO%)=X% 

347 SO% = S0i + 2% \ S%CS0%-1%) = X% \ S%CSO%) = Y% \ c;IjTO 130 
; ADTi r-'f'-. PAKTITIfJf. TO iHt, STACK 



RSTS-11 SORT,V07 
SQWIK V0 7-03 



Seq 9.6.3* 
1 of 1 



%o8 



SOFTWARE DISFATCH 


RSTS/E 


March 1975 



SORTing a File Without Records 

PROBLEM: 

SORT will not process a data file without any records in it. 

SOLUTION: 

In the module XQWIK.BAS, change line 31055 to begin: 
31055 IF P%(0%)<0% OR... 



SOFTWARE PRODUCT 
RSTS-11 SORT 


VERSION 
V07 


COMPONENT 
XQWIK 


VERSION 
V07-01 


SUBPROGRAM OR ADDITIONAL INFORMATION 


SEQUENCE 
9.7.1 


PAGE 
1 OF 1 


NEW REPLACEMENT ARTICLE 


ORIGINAL DATE 
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RSTS/E Software Dispatch 
June 1976 



PARTIAL KEY EXTRACTION DOES NOT FUNCTION PROPERLY (SPP 11-4157 GH) 



PROBLEM: The partial key extraction feature of SORT does not func- 
tion properly. Also, certain errors during key extraction do not 
return correct data to SORT. 



PREREQUISITES: XQWIK.BAS V07-0 2 (includes Patch 1) and SORT.BAS 
V07-04. 



DISPOSITION: In the source file XQWIK.BAS, retype the following 
lines or edit the underlined additions and modifications into the 
existing lines : 



XO'/'IK VKRSirj^ 07 



Km iM 



cn/^i/ib 



Cff-if'irvw i-j72/n,74,7b rjiciiAL [•.(,, 1' 1 1- '-Kin cfjKpripAi It.. 

MAVriAhL), ('A>S5. 01754 

ISO tHr.l " Hi'.lK V()7-ui"; IK r7'i 

24Sh<) ]9%=I8s: [9* = H% JH v^f% = b%: M\ LhRfTi GUTf) 327 Jij; 
](■ V/.»r1% OP o% = U'J. THKu 

OPt'J PS(V2%/5)%)" KiF- Iht'UT AS KUK f^. ( \/ 25.+ 1 % .1 
PtCUHDSlZh. r % ( V2?; + V% ) /( % C V 2%f i% J +b 1 2'-? : 
GOTCl 2PS7 
:ii\]T, i-i>h'u OK 
32000 L% = U%: kS=F.>iGS( V^%,6%) 



:hrj KxiRAciiO'i subhcju'i 1 f-, ^ . . . 

3 2 7 6 H %= I ^ f 1 R ( I % , K 9 S , i y S ) : 
^ qs,=c V TS % ( ^-i I ( rTT; 

) '-S IR ( l.'iS t K ( H%V1 4 ,P9£ .I)9$J t 1 i . RVG^lrVS) + 1 * , 

2*)): 

GUIC 400 



Recompile the resulting source program.. 



RSTS-11 SORT V07 
XQWIK.BAS V07-02, V07-04 



Seq 9.7.2* 
1 of 1 
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PSTS/E Software Dispatch 
June 1976 



XQWIK.BAS DOES NOT ACCEPT A TYPE 1 DATA FILE WITH SIX-BYTE RECORDS 
(SPR 11-4545 GH) 



PROBLEM: XQWIK.BAS does not accept a type 1 data file with six-byte 
records. 



PREREQUISITES: XQWIK.BAS V07-03 (includes patches 1 and 2). 



DISPOSITION: In the source file XQWIK.BAS, retype the following 
lines or edit the underlined additions and modifications into the 
existing lines: 






XU/. IK VKKSlJfJ Ijl 



HI IT '( 



iV5/^ i/ lb 



3101 



CC'iyi-lrHt 1S)7^ , / J,74 ,7S liK.JIAL M.u tpMt,^' I CiiHpilf- 1, I 1 fii« 

^'AVi-.Al'lJ, f'AiiS. 1)1 7 b 4 

fKli»'I " XOi-'IK UiV-04"; IF 11^ 

I- / 4 ( K 1 s 1 = ;. ^i : 

hi. .St rr tii>Oi AM!1 MSr*(i-91. + ^%)>5u»^'4 lih H-;<1% i hh i, i//^s 



Recompile the resulting source program. 



RSTS-11 SORT V07 
XQWIK.BAS V07-03 



Seq 9.7.3* 
1 of 1 
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RSTS/E Software Dispatch 
June 1976 



CORRECTION OF PARTIAL KEY EXTRACTION DESCRIPTION 



(GH) 



There is an error in the description of the Partial Key Extraction 
facility available with SORT. Please replace the second sentence of 
Section 2.7 of the RSTS-11 SORT User's Guide (on page 2-13) with the 
following: 

The user must update the total record count in the original 
unsorted data file when he appends new records to it . 

(The underlined portions represent the corrected text.) 



RSTS-11 SORT USER'S GUIDE 
DEC-11-ORSGA-A-D 



Sea 9.8. 
1 of 1 
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SOFTWARE DISRfiJCH 


RSTS/E 


April 1975 



Creation or Reorganization Results in Infinite Loop 



PROBLEM: 

If the length of an lAM KEY INDEX File bears a certain relationship 
to factors used in the hashing algorithm, creation or reorganization 
can result in an infinite loop. 



SOLUTION: 

It is necessary to prevent the use of certain sizes for the KIF. Add 
the following statement to the beginning of line 246 of lAMGEN.BAS: 

246 I%=I%+1% IF P7%(I%)=29% OR P7%(I%)°37% 
OR P7%(I%)=61% OR P7%(I%)=7"3%" 
OR P7%(I%)=97% : 
F%(N1%)= ... etc. 

Also, update lines 1 and 5 to indicate EDIT 02. 
The altered lines will appear as: 



1. 



I I 
J I 
I I 
I I 

I I 



<?4 5 



lAlGK,'. VhHSJO^ 01 F:iiTT f? 01/04/75 GJH/WKL 

CnPYKIGHT 1972,73,74,75 DIGITAL.- t;OU J PMFj F CORPDH ATT D,N 

s' ft \/ r. n r 1 ri » B r" r* r* < T t ^ 

'■1 » 1 '■; ti r. iJ f ;•■■ u OO , I.J I I V"i 

X6s = K!'Cn^,: X6S=,'^yS(CHKS(i.i6%)+CHR$(iv9%)+CHH$(!\0%)) : 
XhG = ;M it ( XbS , ^ 3% , J NSTR ( ,i3% , X6 S ,CHP$ ( Iv0% ) ) -;;3%) : 
P.U-T "l/^MCF^o VOl-02 - ";X6$ 

I'i=l%+1% IF P7%(J%) = ?9% OR P7%(t%)=37% OH P7%(|%)=61% 

OP P7%(I%)=73% UP P7%(I%)=y7%: 
K%(i.u)=P7%(j%) + :':i%: n/jst; r-7%: O" ppptip goto o: 
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SOFTWARE PRODUCT 
RSTS/E Commercial Extensions 



COMPONENT 
lAMGEN 



SUBPROGRAM OR ADDITIONAL INFORMATION 



NEW 



REPLACEMENT ARTICLE 



VERSION 
V01 



VERSION 
V01-01 



SEQUENCE 

10.2.1 



PAGE 
1 OF 1 



ORIGINAL DATE 



SOFTWARE DISRMCH 



RSTS/E 



April 1975 



Number of Records in Input Data File Calculated Incorrectly 



PROBLEM: 

lAMGEN does not correctly calculate the nurnber of records in an 
input data file. 



SOLUTION: 

In line 220 of lAMGEN.BAS, change the reference from II to 11% as 
underlined below: 



■I2{i 



iamgf: 



VKP.S]D;v Oi bDTT 03 



01/04/75 



GJH/WKL 



COPYHIGHT 1972,73,74,75 DIGITAI. KCmPMF.r:! CORPdHAT llJM 

'"AYIMARD, rtASvS. 01754 

Xb% = Pt Ct-.%: X6S=SYSCCHR$(^b%)+CHR$(N9%)+Ciil*$(N0%)): 

Xb$=vn(ye>$,N3%,]^-:STF'(i-i3%,X6S,ClJRSCN0%))-;O%): 

PkIM "lAf-GKf- vol -03 - ";X6$ 

IKH HFADFH 

X9% = r U% : X9% = f'. 1 %1 KCn% = ra % : )0= U O-'' 1 % ) * ( 5 1 2%/ ( F^ ( N9% ) -X9% ) ) + IJ_%-Z6 : 

Jl=Ff F (F%(^ ■2%))*K%(10%)-J0: IK J KG. THh-fi 
F%(r.'/?:)=FtF%( (jO + 7.fc)/F%(10%)f r 1%) : GSUn 220 



Update lines 1 and 5 to indicate EDIT 03. 



SOFTWARE PRODUCT 
RSTS/E Commercial Extensions 


VERSION 
V01-02 


COMPONENT 
lAMGEN 


VERSION 

V01-02 


SUBPROGRAM OR ADDITIONAL INFORMATION 


SEQUENCE 

10.2.2 


PAGE 
1 OF 1 


NEW REPLACEMENT ARTICLE 
X 


ORIGINAL DATE 
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SOFTWARE DISPATCH 


RSTS/E 


April 1975 



No Error Message Is Given If INPUT and OUTPUT Name the Same 



PROBLEM: 

In lAMGEN if the INPUT and OUTPUT DATA FILES have the same name, the 
user is asked to provide the names again, but no other error message 
is printed to inform the user. 



SOLUTION: 

In lAMGEN.BAS, line 38 has to be modified as indicated by the underlining 
below: 



1 ' ' 
J • • 

I I I 



1 1 I 

I I r 

I I I 
b 



^8 



to- 



! I 



f [ ' ;; K 






VfrlkSJf'i' 01 FDTT 04 



05/14/7 5 GJH/aKL 



:i COt'Y!-J(;j;T 1 ■< 7 2 , 7 3 , 74 , 7b i'TC.]TAL. tQti IP'-^fc^jT COPFu^AXinii 



^AYrAj-i), iv.AS5. 01754 

%ht = t I ri^'k: Xb$ = SY.S(Cfir'Si:ft 6%)+CMN$(r 4%)+CriH$(rjO!i) ) : 
>. ^^ & = ' 1 (^ ( X I ■ S , ' . 3 % , I 'v S r f-: C . . 3 * , X o $ , C H H- $ ( ■ : U % ) ) - ( , 3 % ) : 

rF L; T "-jA-wK*' Vui-04 - ";XbS 

r'Pl'.T "I'iPi.iT A^^! lU'TPUr DATA t-It.FS ^'l.^ST hE D IFt^^ER^:^T" ; 



rkJrn. ";'<r VuU Si^Mf-";: ir KM7$<>"Yf-;S" rnE'r. 36 

hi.SI- l-'P] rr "PirCP^J^TP F1T,K"?: IF Ff!l7S<>"yFK" THEM (j2* = 0% 

iCi KCK His i'l-F f-f-H f >i:Vjf- ^CF , t- TC . 



Note that lines 1 and 5 should also be modified to indicate EDIT 04. 



SOFTWARE PRODUCT 
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VERSION 
V01 


COMPONENT 
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VERSION 
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10.2,3 
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ORIGINAL DATE 
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RSTS/E Software Dispatch 
May 1976 



ERROR IN DRF SIZE DURING REORG (SPR 11-4981 GH) 



PROBLEM: REORG calculates the wrong DRF size if the number of 
expansion slots is changed. 



DISPOSITION: In lAMGEN.BAS, line 235, remove the -Nl% , and correct 
the edit level indicated. The corrected lines are shown below: 






;3'5 



}A'i.-<-'- 



m:i-3 ].'■'. ') ) Kin (.:> 



r I !p ■) t- 1 r, '• ^' xn ?. , I i , ! \ ,1b ,"Kj 



7 r> / v; -^ / ) 5 



i h i' 1 "1 '* ■■'•- '■ f.ii--'^ - " ; Xr? 

; !• h i- *• f f- (■, M 

M- 1 ' I "T)'5''L> 9 t'K h "> ^■ 1 ■ K 1 U ''■ 5LC1S l:f S f f^hu " ; : >; = Knl7; 



RSTS/E COMMERCIAL EXTENSIONS (lAM) VOl 
lAMGEN vol- 04 



Seq 10.2.4* 
1 of 1 
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CERTAIN KEY INDEX FILE SIZES CAUSE INFINITE LOOP (SPR 11-8741 FH) 



The lAM functions may loop indefinitely if the Key Index File size 
equals 30, 38, 62, 74, or 98. 

Recreating or reorganizing an lAM file after the installation of 
the patch given in Article Sequence 10.2.1 will correct the Key 
Index File size. (That patch only affects the lAMGEN program. No 
other patches are required.) 



RSTS/E COMMERCIAL EXTENSIONS VOl Seq 10 2 5 

lAMGEN 1 of 1* 
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RSTS/E Software Dispatch, August 1976 



STRTAD ENTRY IN FDB IS NOT ALWAYS RESET (SPR 11-8871 FH) 



When using the create function of the lAMGEN program, if a file is 
used for the FDB source and no input data file is used, then the 
STRTAC (third) entry in the File Descriptor Block is not reset. 

In line 95 of the lAMGEN program, include the variable F%(N3%) after 
F%(N4%) so that they are both set equal to Nl%. The line should then 
read as follows: 

(it^K'i If? fUH T^iPl^T PS HILt il%: (.-K'l Si.li: 

10=1.1 Krvrs^cios) ): i u.=cvi $%( i is ) : u%=cv i s%( .1 vs ) 

IGHAH ufADKH 

Note that this patch need not be made if only the lAM functions and 
programs are used to access lAM files, since they do not reference 
that entry. 



RSTS/E COMMERCIAL EXTENSIONS VOl, DMS-500 V02 Seq 10.2.6* 

lAMGEN 1 of 1 
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RSTS/E Software Dispatch 
June 1976 



BLANK RECORDS IN A DATA FILE MAKE INDEX OPTION FAIL (SPR 11-4982 GH) 



PROBLEM: If blank records or blank keys exist in a data record 
file, the INDEX option of lAJ^GEN will create an invalid key index 
file. 



DISPOSITION: In lAMCRI.BAS, change line 20040 to line 2)2(140. 
Line 2014jiJ will then be: 



20140 U6$=MID(U5$,F%(14%)-N1%,F%(12%)) : 
IF U6$=" " THEN FNX9%=N6%: 
GOTO 20330 
: RETURN UNHAPvMED IF BLANK KEY 

There will be no line 20040. 



RSTS/E COMMERCIAL EXTENSIONS Seq 10.3.1* 

lAMCRI vol 1 of 1 
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RSTS/E Software Dispatch 
June 1976 



lAM VERIFY CANNOT HANDLE TOTALLY FULL FILES (SPRll-5032 GH) 



PROBLEM: When an lAM data record file (DRF) is full, the verify 
option of lAMGEN will fail with an end-of-file error. 

DISPOSITION: In lAMVFY.BAS, line 36J!f, the third and last GOSUB 370 
should be changed to: 

GOSUB 370 IF E% 

Line 360 will then be as follows: 



360 L%=1%:M%=1%:N%=2%:0%=INT(512/F%) :GOSUB 370: 
L%=2%:M%=D%-1%:N%=1%:G0SUB 370: 
L%=D%:M%=D%:N%=1%:0%=E%:G0SUB 370 IF E% : 
CLOSE N3%:0N ERROR GOTO 3 2400: 
OPEN K6$ FOR INPUT AS FILF, N3% 



RSTS/E COMMERCIAL EXTENSIONS (lAM) 
lAMVFY VOl-01 



Seq 10.5.1* 
1 of 1 



30'0 



SORWARE DISRMCH 



RSTS/E 



January 1975 



Using FND% with More Than One lAM File 



PROBLEM: 



Using FND% (from lAMFNS) with more than one lAM file may not work 
properly. 



SOLUTION: 

In lAMFNS, insert at the beginning of line 25055 the following 
statement : 

V5%=(U5%+l%)/2%: 
the line will then read: 



25055 V5%=(U5%+l%)/2%: 

IF LEN(U6$)<>U5%(V5%,12%)... 
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VERSION 
V01 
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ZH 
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SOFTWARE DISB^TCH 



RSTS/E 



January 1975 



Records Added to lAM Files Through FNA% In Spite of the Occurrence of 
an Error 



PROBLEM: 

Although an added record has a duplicate key (or one that has 
been marked for deletion) , an additional space in the Data Record 
File (DEF) is used up before the error is detected. 



DISPOSITION: 

This error only causes the loss of space in the DRF since no index 
entry points to the false record. The error is a complex one to 
avoid. A correction will be published when available. 



SOFTWARE PRODUCT 

RSTS/E Commercial Extensions 


VERSION 
V01 


COMPONENT 
lAMFNS 


VERSION 
V01-01 


SUBPROGRAM OR ADDITIONAL INFORMATION 


SEQUENCE 
10.7.2 


PAGE 
1 OF 1 


NEW/ REPLACEMENT ARTICLE 


ORIGINAL DATE 
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RSTS/E 


January 1975 



Conversion of Data From the 4-Word Decimal Arithmetic Package 



For the users of the four-word Decimal Arithmetic package on RSTS/E 
V05-21, it will be necessary to convert any numeric data in files 
to take advantage of the new, faster Scaled Arithmetic on RSTS/E 
Version 5B and 5C. For those who prefer not to convert, the Decimal 
Arithmetic package is distributed with Version 5B and 5C as well. 

Under four-word floating point Scaled Arithmetic, first retrieve the 
Decimal number as if it were a normal floating point number, either 
from a virtual array or using the CVT$F function. Then apply the 
function FNC listed below (lines 29000-29010) to convert to the correct 
floating point value. The program below contains examples of both 
virtual array and CVT data conversion. 



100 OPK.J "VIHAHY.f':4D" AS RILE 1 \ l-JN' »-l , ACIO) 
110 FOR l%=0% JO 1U% 
120 ACl%J=KiJC( A(l%) ) 
130 PRUvIT A(l%) 
140 NKXT 1% 
IbO CLOShJ 1 

200 npKM "CV TFIL.NHO" AS P ll.t 1 \ GET « 1 , HFCURU 1 
210 FOR l'^ = 0% TO 10% 
220 FIKI.n » 1 , «%*!% AS 
LSt;r A$=CVTF$t 
2 JO PRINT CVT$K(A$) 
240 NEXr li, 

2bO PUT #1, RtCOHO 1 \ CLdSE 1 
300 GOTI) 32 /b? 
29000 



AS, B% AS AS \ 
FNC( CVISFCAS) 



) ) 



DF.F FNC(F) \ 0$=CVTFS(F) \ 
Q% ( Q% ) =C V T$% C M I D t S , 7 %-y 
U=0 \ Ql=Vs(0%) \ 
IF 0%(0%)<0% THKN Vl=-l'l 
U%(U%)=-U%CC>%)-1' 
g%(3'R)=-0%(3%) 



DiH y%(3) \ 

;-Q%,2%)) FUR 



y% = 0?. TU 3% \ 



1 \ 

, FtiR 



0%=1% TU 2% \ 
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SOFTWARE DISBMCH 


RSTS/E 


January 1975 



Conversion of Data From the 4-Word Decimal Arithmetic Package 



29010 KOl-i y%=l% TO i% \ 

02=y%Cy%) \ Q2=y2+b553fa ]K y2<U \ 
gl=bbb3b*01+y2 \ 

g2=ifsiTCUi/ii-:b) \ oi=yi-iFb*g2 \ 

(:) = b553b*y + Q2 \ 

NEXT g% \ FNC,y=y+Qi/iE:6 \ FNC=-y if y%(o%)<o% \ 

FNFND 
327b7 ttil) 1 fcJtfclFEEKFFFE MMajNNI\)MM(\i DUDDDODDDD 



SOFTWARE PRODUCT 
RSTS/E Commercial Extensions 


VERSION 
VCfl 


COMPONENT 
4-Word Decimal Arithmetic 


VERSION 


SUBPROGRAM OR ADDITIONAL INFORMATION 


SEQUENCE 
10.9.1 
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UNDERFLOW DETECTION IN FORTRAN OTS 



PROBLEM: The no hardware (NHD) version of the FORTRAN object time system 
(OTS) does not detect some cases of underflow. 



DISPOSITION: The following patch corrects the problem. 



PROCEDURE: 

1. This is a patch to the RSTS/E FOflTfiAN IV object time system (OTS). 
The user should keep track as to which patches have been installed 
in his OTS; there is currently no patch level indicator. 

2. Log into the system under account [1,2], the system library 
account. 

3. Mount one of the following HST3 FORTRAN distribution media on a 
free unit. 

Copy of DSC-11-LRFSA-A-HB (RK) 
DEC-n-LRFSA-A-UB2 (DECape) 
DEC-11-LRFSA-A-MB7 magtape (7-track) 
DEC-11-LRFSA-A-MB9 magtape (9-track) 

Make the unit ready. 

3a. (RK distribution only) 

Mount the copy of the RSTS FORTRAN distribution media using the 
UTILTY program and the pack ID FORTRAN. 

Jl P<-t w\^r *-]ni'\. klUn (^DT mA^til^ ■fwt^iw, 4- V\ et t^ A et¥ v% i V\t *¥■ A ^v\ m A/4 A ^ ¥ ^ 4-Wa ct\Tcs¥ am 

device as follows: 

4a. (RK and DECtape distribution) 

RUN $PIP 

#SY:NHD.OBJ=xx:NHD.OBJ/CO:T for DECtape, 

iilSY: NHD. OBJ=DKn:NHD. OBJ/CO for RK disk 

4b. (magtape distribution) 

RUN $PIP 

#SY: NHD. OBJ=MTn:[ 128, 128]NHD. OBJ/CO 
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5. Install the patch using PATCHO as shown below. 
RUN PATCHO 

^um 

ENTER INPUT FILE* NHD.OBJ 
ENTER OUTPUT FILE' TmPTMW 
'POINT FMULS 

*WORD 122=iF?n? 
*WQRD ih: 



•WORD ^2b= 
*WORD ^^0=#TDOT 

*>JOHD 1^4= lit- 14 






*WORD 1itb=ii^^6? 



*^OfiD ^q6=)P7?774 
*>JORD lil2=<itb^70 4 
IwUEOMiFmST 



*KXIT 

■ENTER CHECKSUM: 105^26 

iiTOP — 

Ready 
RUN $PIP 

#nhdTobj/re=nhd.new 
#tz 

6. At this point the module NHD.OBJ should be copied onto the backup 
media for possible future use. 

e.g. RUN $PIP 

#xx:NHD.03J=NHD.0BJ/CQ where xx is the backup device. 

7. If the NHD version of the FORTRAN OTS was built during system 
generation, then that library should be rebuilt. That procedure 
IS described in the RSTS/E System Generation Manual (DEC-11-0RGNA- 
A-DN1) page 4-69, 4-70 and is reproduced below. 

7a. Copy the files UNI.03J,0TSC0M.0BJ,F0PEN.0BJ,V2NS.0BJ from the 
distribution media if not already in account [1,2]. e.g., 

RUN $PIP 

#SY:=M1h:[ 128, 128]UNI.0BJ/C0,0TSCOM.OBJ/C0,F0PEN.0BJ/C0,V2NS. OBJ/CO 
#Sy:=DKN: UNI. OBJ/CO, OTSCOM. OBJ/CO, FOPEN. OBJ/CO, V2NS. OBJ/CO 
)i(Si:=DTn: UNI. OBJ/CO: T,0TSCOM.0BJ/CO:T,F0PEN. OBJ/CO: T,V2NS. OBJ/CO: T 
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7b. Build the library as follows: (the underlined text is typed by 
the user; all lines are terminated with a carriage return). 

RUN $LIBR 
*NHDLlb<4Q>=UNI.QTSCQM.F0PEN.V2NS.NHD/G 

cliVTRY POINTS: — 

$LRRS 
$ERRTB 

<CR> (type a carriage return for the third line. It must be blank.) 

$FIO ILL INS These are expected error messages 

$END2 ILL INS which should be ingnored . 

$END2 ILL INS 

|CL02 ILL INS 

$FI02 ILL INS 

$FI02 ILL INS 

*tz (type control Z here) 

8. The files NHD.OBJ^ and any files brought in by step 6a may be 
deleted at the user's discretion. 
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NULL ARGUMENTS IN FORTRAN SUBSCRIPT LISTS 



PROBLEM: Null arguments in the last argument position of a subscript 
list are flagged as syntax errors. 



DISPOSITION: The following patch corrects the problem. 



PROCEDURE : 

1. Tnis is a patch to the R3T3/fc. FOriTRAij IV compiler. 

2. Log into the system under account [1,2], the system library 
account . 

3. Create a copy of the compiler. This is the copy to be patched. 

Rli'A $FIP 

#OLDFOR . SAVrFORTRA . SAV/CO 

#TZ 

^. In the following the user types the underscored text; <Cfi> 
denotes the carriage return key; <LF> denotes the line feed key. 
Tne resulting version of FORTRAN will oe FORTRAN IV V01C-03A. 

tibh IPATCH 

PATCH vol -02 



FILb NAME — 
*OLDFOH/0<Cri> 

^107l g72/ 
1u: 1,^2747" 
*2210;2R 
*10:2;0/ 
10:2,2/ 
10:2,^4/ 
10:2,6/ 
10:2,10/ 
10:2,12/ 
*' 2260;3K 



\2-\b21 
26 



121527<LF> 





2e)<LF > 

140 2<lF> 

l2T57r<lF > 

15 ^<LF> 

20I1SjJ> 



40 



1QKCR> 



Ready 
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b. Users Should refrain from invokiner FGhTRAN for the duration of 
^iin^ "f^t step; the rnessas;e Can't find file or account at line 
d?' '?iiL°r Senerated if tURThAK.SAV is not present when either 
hU.\ ^^runrhAN or tne tUn CoL conmand is used to invoke FORTRAN. 

At this point tne new (patched) co:7ipiler should be -nade to replace 
tne unpateneu version. The protection code must be changed to 
< lif4>. e.g., 

fiU.M $PIP 

tfOLDFUR . SAV< 1 2H>/RE 

«URThA.5AV/DE 

)/FORTKA . SA V/ht.=OLDFOfi . SAV 

frTz 

6. i.ow that the patch is installed, the patched version of FOHTRAr; 
should De copied onto some backup -nedia for possible future 

RON $PIP 

#xx:FORTaA.SAV=rORTRA.SAV/CO xx is the backup B£V1C£. 
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INCORRECT PROTECTION CODES FOP UTILITIES USED DURING FORTRAN 
INSTALLATION PROCEDURES 



PROBLEM: The FORTRAN installation control file installs LNGBLD.BAC 
and UTILTY.BAC with incorrect protection codes, i.e., <232> instead 
of <124>. 

DISPOSITION: The following procedure corrects the problem. 

PROCEDURE : 

1. Log into the system under account [1,21, the system library 
account 

2. Rename the protection codes of UTILTY.BAC and LNGBLD.BAC to 
<124> using PIP as follows: 

RUN PIP 

#UTILTY.BAC<124>/RE 

#LNGBLD.BAC<124>/RE 

#tz 
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OBJECT-TIME HOLLERITH FORMAT PROBLEM 



PROBLEM: Object time format using the H format specification causes 
trap to 4, memory management violation, or other errors. 



DISPOSITION: The following patch corrects the problem. 

PROCEDURE: This is patch 2 to the RSTS/E FORTRAN IV object time 
system (OTS) . The user should keep track as to which patches have 
been installed in his OTS; there is currently no patch level 
indicator. 

1. Log into the system under account [1,2], the system library 
account 

2. Mount one of the following RSTS FORTRAN distribution media on a 
free unit. 

Copy of DEC-11-LRFSA-A-HB (RK) 
DEC-11-LRFSA-A-UB2 (DECtape) 
DEC-11-LRFSA-A-MB7 magtape (7-track) 
DEC-11-LRFSA-A-MB9 magtape (9-track) 

Make the unit ready. 

2A. (RK Distribution only) . 

Mount the copy of the RSTS FORTRAN distribution media using the 
UTILTY program and the label FORTRAN. 

3. Copy the OTSCOM.OBJ module from the distribution media to the 
system device as follows: 

3A. (RK and DECtape distribution) = 

RUN $PIP 

#SY:OTSCOM.OBJ=xx:OTSCOM. OBJ/CO where: xx = DTn for 

DECtape, DKn for 
disk cartridge. 

3B. (Magtape distribution) . 

RUN $PIP 

#SY:OTSCOM.OBJ=MTn: [l28,128] OTSCOM. OBJ/CO 

RSTS/E FORTRAN IV V0 6A-02 Seq 14.1.4 
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OBJECT-TIME HOLLERITH FORMAT PROBLEM 

4. In the following the user types the underscored text; lines are 
terminated by a carriage return. 

RUN PATCHO 

*OPEN 

ENTER INPUT FILE* OTSCOM.OBJ 

ENTER OUTPUT FILE* OTSCOM.NEW 

* POINT FORMAT 

*WORD 1510=13373 



* POINT OBJFMT 
* WORD 1134=1-65300 
* WORD 1136=14767 
* WORD 1140=#-212 
* WORD 1142=15302 
* WORD 1144=#-77405 
* EXIT 
ENTER CHECKSUM: 67432 

STOP ~ 

Ready 

RUN $PIP 
# OTSCOM.OBJ/DE=OTSCOM.NEW 

5. At this point the module OTSCOM.OBJ should be copied onto the 
backup media for possible future use, for example, 

RUN $PIP 

#xx:OTSCOM. OB J=OTSCOM. OBJ/CO where: xx is the backup 

device. 

6. The FORTRAN library should now be rebuilt. 

That procedure is described in the RSTS/E System Generation 
Manual (DEC-11-ORGNA-A-DNl) page 4-69, 4-70 and is reproduced 
below. 

In the following, ??? represents the hardware module appropriate 
for your configuration, i.e., EIS, FIS, or FPU. 

6A. Copy the files UNI. OBJ, ???.OBJ, FOPEN.OBJ, V2NS.0BJ from the 
distribution media if not already in account [1,2]. 
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e.g. , 

RUN $PIP 

#SY : UNI. OBJ=MTn:[ 128, 1281 UNI. OBJ/CO 

#SY:???.OBJ=MTn:[ 128, 128]???. OBJ/CO 

# S Y : FOPEN . OB J=MTn :[128,128lFOPEN, OBJ/CO 
#SY:V2NS.0BJ=MTn: f 12 8, 128] V2NS. OBJ/CO 

For magtape and 
#SY : UNI . OBJ=xx : UNI . OB J/CO 
#SY: 2??. OBJ=xx:???. OBJ/CO 

# S Y : FOPEN . OB J=xx : FOPEN . OBJ/CO 

# SY : V2NS . OB J=xx : V2NS . OBJ/CO 

For DECtape and disJc cartridge (xx=DTn or DKn) . 
For DECtape, /CO:T should be used. 

6B. Build the library as follows: 

(The underlined text is typed by the user; all lines are termin- 
ated with a carriage return. ) 

RUN $LIBR 

*FORLIB<40>=UNI,OTSCOM,FOPEN,V2NS,???/G 
ENTRY POINTS: "~ 

|ERRS 
$ERRTB 



$FI02 


ILL 


INS 


$END2 


ILL 


INS 


$END2 


ILL 


INS 


$CL02 


ILL 


INS 


$FI02 


ILL 


INS 


$FI02 


ILL 


INS 


*t2 


CTRL/Z 



(Type a carriage return for the third 
line. It must be blan]t.) 



7. The files OTSCOM.OBJ and any files brought in by step 6A may be 
deleted at the user's discretion. 
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ENCODE/DECODE WITH OBJECT-TIME FORMATTING 



(GH) 



Object time ENCODE/DECODE does not restore the free space pointer properly. This 
may cause illegal memory reference or other errors. 

The following patch corrects the problem. 

This is patch 3 to the RSTS/E FORTRAN IV object time system (OTS) . The user should 
keep track as to which patches have been installed in his OTS; there is currently 
no patch level indicator. 

1. Log into the system under account [1,2], the system library account. 

2. Copy the file OTSCOM.OBJ from the backup media where it was stored (in the last 
patch) , e.g. , 

RUN $PIP 

dSV :=xx:(JTiiCnM.imJ/Cu (xx is I'hh, hackuh DtViCb. 

IH XX = uin: I'rit,^ /cn:v HiJt>f ut ustu) 

3. In the following, the user types the underscored text; lines are terminated by 
a carriage return. 

RUN PATCHO 

*iJPKN 

K>Ji>,H INPUT Klbt + UlSCliK.UbJ 

elwifcK (III I PUT HLb,. + (JT;StUt'i..Mt:i« 

^l^illuT (JHJbMC 

+ <j>il!Ki.) lo=»lb/Ui 

+ rtiJKi) 20 = %SAI11S + U 

♦ i^iiHO //'. = (! 1(? i4b 

♦ .iiUHl) Ab-niilbl 
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+ »vOKl) i^ = tt12bb3 
♦wUHD 34=»14 
♦rt'OKD ib=»lbibb 

♦ wiJKD 42 = #4 

♦ wORO 44=11207 
♦tXIT 

KNTKR CHHXKSUi*): 7bfa27 

srup -- 

HtAUl 

HU'J SPIP 

(H)TSC(JNi.l)HJ/Hb; = (JTSCDM.NKifJ 



4. AT THIS FOiMT IHb i^uOUUfc, O'ISCUM.UhJ SHOULD BE COPltD UNTU 
iHt bACKUf ^'tDJA FOK POSSIhLK (•UTUKK USt. 



t.c;. 



kUt^i SPiP 

« > A : D'i scijM. uuj=uT.sca''i . obj/co 



Whtrtt: XX IS THt: HACKUP UEVlCt. 

b. THE (•OKTRAh) hltif<AH'i SHOULD NUke HE Kfc>bUibT. 

THAT PHUCHMJUHE IS DESCPIBEU IN THK PSlS/t SfSTtM GtiMKHA'l lUiM I'-iAiHIAb 
(.DtC-U-UHCf'.A-A-UiNJl) PAGb. 4-b9, 4-70 A<\li.) IS KKPRODUCfcU BLLUW. 

Iti THt. HJLl.ay;iNG, ??V HbPKt.SKf^JTS THt HAKimAHK I'lUDULt, APPRUPRIATE 
K)H yOUK CUKt IGUHAl IDtJ. X . t: . tlS, b 1 S , UK b'PU, 

5A. CUPr Trit KILLS UN 1 . OBJ , .'? V . (.IHJ , FUPKN . iJbJ , V 2NS. JLS J FROM THt 
IJISTWiBUTiriN MtDlA IK NOT ALKtADlt IN ACCOUNT 11, 2J. 

t :. G . 

RUiM $PIP 

iiSi:=frjN: I12ri, 12« J UNl.OBJ/CU, V??.aHJ/CO,KOPt;N.OHj/CU, V2NS.0hJ/CU 

KjH magtapk anu 

«sv : = xx:un] .obj/cu, ???. obj/co, KjPkm. obj/co, \/2ns. obj/co 

Hok DtCTAPK anu disk CARTHlUGt CXX = OTH Ok DKN). 

bb. BUJLD THE LJHRAHi AS FOLLOwS: 

CTHh UNOEPLINFD TtXT IS TiPFD BY I'Ht UStk; ALL LINES ARt 
■|tRMli>iA']K:i) lulTH A CARKIAGt. kt-TUKN). 
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♦ Hj(<I.Ir'<.UJ> = (lNl ,L'I aCOh.HJHtlii, ViN.S, ???/G 



ShhiPIh 



C'liPK A <0> MiH IHK IhlKl) l.,IlMt. IT MUST ttt ttljAijK.) 



Sf lU/? 


J Lb 


1 N S 


St.'MP-/! 


U,L 


IhS 


SE Jl)^ 


IbL 


I W .S 


SCbil2 


ILL- 


li'l6 


$KIU2 


11, L 


Itvii 


St' 102 


ILL 


llJ6 



♦t'i dVPt, CUNTHUL. Z HtHtJ 



b. 'Ihb tlLe:S UISCUK-.UHJ flfJD AiMV Ml.fcS BKUUOril IN i3\' STEP 5A i»IAy 
i't, DhLtTfU A'l THt USbKS I feCHK: T 1 U'M . 
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OPENING FILES IN APPEND MODE 

PROBLEM: CALL OPEN with mode = 2 (append mode) does not work. 

DISPOSITION: The following patch corrects the problem. 

PROCEDURE: This is patch 4 to the RSTS/E FORTRAN IV object time 
system (OTS) . The user should keep track as to which patches have 
been installed in his OTS; there is currently no patch level indica- 
tor. 

1. Log into the system under account [1,2] , the system library ac- 
count. 

2. Mount one of the following RSTS FORTRAN distribution media on a 
free unit. 

Copy of DEC-11-LRFSA-A-HB (RK) 
DEC-11-LRFSA-A-UB2 (DECtape) 
DEC-11-LRFSA-A-MB7 magtape (7-track) 
DEC-11-LRFSA-A-MB9 magtape (9-track) 

Make the unit ready. 

2A. (RK distribution only) . 

Mount the copy of the RSTS FORTRAN distribution media using the 
UTILTY program and the pack in FORTRAN. 

3. Copy the FOPEN.OBJ module from the distribution media to the sys- 
tem device as follows: 

3A. (RK distribution) . 

RUN $PIP 

# S Y : FOPEN . OB J=DKn : FOPEN . OBJ/CO 

33. (DECtape distribution) . 

RUN $PIP 

# S Y : FOPEN . OB J=DTn : FOPEN . OB J/CO : T 
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3C. (Magtape distribution). 

RUN $PIP ^ -, 

#SY:FOPEN.OBJ=MTn: [128 , 128j FOPEN. OBJ/CO 

4. Copy the file OTSCOM.OBJ from the backup media where it was 
stored (in the last patch) . 

e.g. 

RUN $PIP 

#SY:OTSCOM.OBJ=xx:OTSCOM. OBJ/CO xx is the backup device. 

if xx=DTn: then /CO:T 
must be used. 

5. In the following, the user types the underscored text; lines 
are terminated by a carriage return. 

RUN PATCHO 

* OPEN 

ENTER INPUT FILE* OTSCOM.OBJ 

ENTER OUTPUT FILE* OTSCOM.TMP 

* POINT $CLOSE 

* WORD 122=142 

* WORD 126=#10446 

* WORD 130=#10663 

* WORD 132=#144 

* WORD 134=14767 

* WORD 136=#244 

* WORD 140=#775 

* WORD 142=144 

* WORD 144=#12604 

* EXIT 

ENTER CHECKSUM: 153163 

STOP — 

Ready 
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OPENING FILES IN APPEND MODE 



RUN PATCHO 

* OPEN 

ENTER INPUT FILE* OTSCOM.TMP 

ENTER OUTPUT FILE* OTSCOM.NEW 

*POINT 5CL0SE 



*WORD 


404=#4767 


*WORD 


406=%$GETBL+0 


*WORD 


410=#16402 


*WORD 


412=#2 


*WORD 


414=#12705 


*WORD 


416=#400 


*WORD 


420=#5022 


*WORD 


422=#5305 


*WORD 


424=#1375 


*WORD 


426=#5364 


*WORD 


430=#26 


*WORD 


432=#167 


*WORD 


434=%$PUTBL+0 


*EXIT 





ENTER CHECKSUM: 111020 

STOP ~ 

Ready 

RUN PATCHO 

* OPEN 

ENTER INPUT FILE* FOPEN -OBJ 

ENTER OUTPUT FILE* FOPEN.NEW 

* POINT ROPEN 



*WORD 


574=#62 


*WORD 


660=#13704 


*V;ORD 


662=#54 


*WORD 


664=#16446 


*WORD 


666=#4 


*WORD 


670=#4767 


*WORD 


672=%$OPEN+0 


*WORD 


674=#22627 


*WORD 


676=#-77776 


*WORD 


700=#1010 


*WORD 


702=#13746 


*WORD 


704=#420 
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* WORD 706=#-61132 

* WORD 7 10= #5 

* WORD 712=^#6026 

* WORD 714=#5516 

* WORD 716=#12666 

* WORD 72 0=#30 

* WORD 722=#207 

* EXIT 

ENTER CHECKSUM: 40245 

STOP — 

Ready 

RUN $PIP 

# OTSCOM. OBJ/DE=OTSCOM.NEW 

# FOPEN . OBJ/DE=FOPEN ■ NEW 

#OTSCOM.TMP/DE 



At this point the modules OTSCOM.OBJ and FOPEN.OBJ should be 
copied onto the backup media for possible future use. 

e.g. RUN $PIP 

#xx : OTSCOM . OB J=OTSCOM. OBJ/CO 

# XX :FOPEN. OB J=FOPEN. OBJ/CO where: xx is the backup 

device. 

The FORTRAN library should now be re-built. 

That procedure is described in the RSTS/E System Generation 
Manual (DEC-11-ORGNA-A-DNl) page 4-69, 4-70 and is reproduced 
below. 

In the following, ??? represents the hardware module appropriate 
for the configuration; i.e., EIS, FIS, or FPU. 

Copy the files UNI. OBJ, ???.OBJ, V2NS.0BJ from the distribution 
media if not already in account [1,2] as follows: 
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7A. (RK distribution) 



RUN $PIP 

#SY : UNI . OBJ=DKn :UNI , OBJ/CO 
#Sy : ??? . OBJ=DKn :??? . OBJ/CO 
#SY : V2NS . OBJ=DKn : V2NS . OBJ/CO 



7B. (DECtape distribution) . 



RUN $PIP 

#S Y : UNI . OBJ=DTn : UNI . OBJ/CO : T 
#SY:???.OBJ=DTn:???. OBJ/CO :T 
#SY : V2NS . OBJ=DTn : V2NS . OBJ/CO : T 

7C. (Magtape distribution) . 

RUN $PIP 

#SY : UNI . OBJ=MTn :[128,128]UNI. OBJ/CO 
#SY:???.OBJ=MTn: [ 128 , 128 J ??? . OBJ/CO 
#SY:V2NS.OBJ=MTn:[12 8,128]V2NS.OBJ/CO 

8. Build the library as follows: 

(The underlined text is typed by the user; all lines are termin- 
ated with a carriage return) . 



RUN $LIBR 






*FORLIB<4 0> 


=UNI ,OTSCOM,FOPEN, V2NS , ???/G 




ENTRY POINTS: 




$ERRS 






$ERRTB 








(type a carriage return for the third line. 


It must be 




blank.) 




$FI02 


ILL INS 




$END2 


ILL INS 




$END2 


ILL INS 




$CL02 


ILL INS 




$FI02 


ILL INS 




$FI02 


ILL INS 




*tz 


(type CTRL/Z here) 





9. The files OTSCOM.OBJ, FOPEN.OBJ and any file brought in by step 
7 may be deleted at the user's discretion. 
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CALL OPEN OP DIRECT ACCESS FILE FAILS (GH) 



CALL UHc.^v Ut All. 'ULiJ' t'iljb; Kuw 'KAiv'UU:'. ACChciS ntl'UHKS CjAH'iAL.c. 
.'itit.lJ THt liil HLUCK HKAl) TS THf-: 1ST PhifSICAL bLUCK Of IHK MLK. 



IHt KJlLCLvlNC; PAICH CUHNcCTci iHt HRdbLKfl. 

rriis IS PATCH 95 10 THt Rsi'S/t; fDhiHAN (V uHjtcr 1 t'lf.: sisif.N' lijrs). 

IHt USbH SMUbLU KttH TKACK AS 10 ifJhlCH PATCHKS HAvr. bt.t.M J f-iSTALLtlJ 
IN his urs; THtHfc, IS CUHHt,.lLy mi patch LtVK,L iNUiCAlUH. 

1. LUG I'^IIU Tht SiSTHJM UiMDER ACCUUhT ii.2l. iNh; &lfSTfc.w LI»HANlf 
ACCOUHX. 

2. CUPy THt, KILL KaPEiM.ObJ KHOH Tht bACNUF "lb;OTA (.vMtPt IT wAS 
SrOKKu IN THt. LAST PATCH) If NUT ALKtADj" I'M ACCuur.iT 11, 2j. 

h.Q. H[)h SFIP 

HSy :K.iPKN.OBJ = XX:KUPt;N.(,lUJ/CU (XX is THt bACKUP OtVlCK. 

le XX = Otu: IritM /C0:T MUST bK USll)) 

i. li« THt: fULLOwll\G THK USeP T\Pfc.S THF, UnDHjKSCDPtO TtXT; LliMtS AHti 
TKHNSlNATtD bV A CAPftlAGE PKlUHri. 

HUiM SPATCHU 

♦ OPtiv 

KNTfcK IiMPUT t'ILt'.*KC)Pt.:M.at5j 

KirrtH UUrpUT ^ lLt',*FOPKi\,.rjh:*v 

♦ POiMT KlJPtN 

♦ lf,lJRl) 41b = #4;67 
*wUKD 4/!0 = »i04 

♦ WURO 72t) = (tb2710 

♦ kiOPD 7iO = »4000U 
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i i,.r n m ) ■? J « r !» 5 ) I "7 

t.NTfc.H ChtCKSuN! 1740^0 

SI lit' -- 

HtADY 

KUf< SPIF 

nKiJh't-N.UbJ/uK 

If tiJef';iJ.lihj/Rfc = t UFtN.iMI-. / 



4. Al IHli) FiJiM IMK, I'lUUm.hJ Kif'b,N.(.)BJ oHuUtO '-it CUl'lKU InMlfi 
iHfc. BACKUP i'lhUlA KUH t'USSlhLb. MiiUHK USK. 

»^A:tUPt^.UBj = KOh't.i'>'.HHJ/Ci! .--ntHH, <X iS I'lt i<ACNUf iJhViCt. 

5. IHt efiKl'HAf. IjlhKARi SMDIJbU hdi-, HL Kh,-HUlLr. 

IHAI PkOCb.UUKt. IS OesCHlhr-O Ifi IHfc. HSiS/E SYSTEM GtivlikAl iUiM MA^nlAb 
( Ur.C- 1 l-llHGKA-A-DM 1 ; PAfiK 4-by, 4-7u AwU IS KheKiil^iCEO c^tLilw. 

1 iv, iHK KdLl.LJ'^I^G, ??? HtPHtSLfi'l S I'Hi:: riAHUwAHt '-I i J D U [, t, APt- KUPIU A It: 
MJh YUUK CONKU.UHAnOi\. I.e.. KIS, KIS, Mri fPii. 

CUPY IfiK Kil.fr: liTSCUi'i.ObJ bPlj!" IMh. tiACKliP i-iHJHA lAMtHC II .vAS Sl'uKtO 
Ii>i THh, bASI PAICH) lb ilUl ALWtADV J N ACCUU'Ml' [!,'/!). 

t-. . C, . H U r. S P i P 

«6i :Ci) SC j!vi.tJriU = *.X :0TSCLJii.Ut5j/C(l 
(XX IS I'HL hACKuP UbVlCt. lb XX = Dili IHhN /Cu:i ^lUSl bl-, OScUJ 

CUPY Ihe: FILKS U.U .UbJ , /?? . UHJ , V^.vS.iJHd KPU:i Ht D 1 STH I bUTiOr-i 
Mf.DIA IK MfiT ALHtAUY I ■« ACCdUiVr I I , ^! .1 AS fUbLu.vS: 

fUUNi Ui'ih- ijf 'Iht PLiliL(J«'Jli^(; HSIS KUKIPAN Ui S J P 1 dU llUiJ ItDiA 
UN A bHh.e UMl. 

CUPY Ut Ut.C-1 1-LHKSA-A-hb ((vK) 
UKC-l,l.-LHbSA-A-Ub^ (OKCTAPf:) 
Ub:C-l 1-1.PKSA-A-MB7 /Al.TAPt (7- TRACK) 
l;bC-l l-LPHSA-A-y.by riAGTAPF r^-iKACKJ 

'"lAKL ihe, UMT PtAUY. 
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bk. ChiK l; 1 .SI HlhUT lUf< ) 

(■■Uiir-1 IHt CnPY (J^ fHt KSJ6 t-JWIkAj I) 1 S F r( i d J I [ ij'. ^'hLUA Ooi-t; Thb 
liUbl'V PhubPAi.i Al-iu IHf, [,Aht,l, fiJHlKAj. 

KU"i SiaiLll 

fci-'ijuM Dm* : r ijH I>Af. 

h U f- S F 1 H 

».Si( :uN I .L.Hj = ijK'i: Ilk I .(ihj/Cu 
♦ Sif: ? j'?.Ubj = UM-j: ???.Lihj/Ci) 

»6i : V2ivK.UhJ=0Kiv : v ^:<i,A>t,J/C'< 
bH, t(ife.C-iAHb l.'iSlH Iburnja J 
HU^N, SPIF 

».sv :uivi.(i»j = in iM:iji»i .ul'J/C():t 
KSi : .•'??.ohj=oii,i: ???.i)f«j/co:T 
«6» : v^Ns.Ubj = ui iv: v<! vS.Ufij/C(i:x 

bC. (MAGTAHfc. DlSlf-IHUTJCii'J ) 
HUiJ SPIP 

nSY :UNi.Ubj=Mr'M: ( 1 2M, i/i«) :iiM .OBj/cu 
SSI :?i'r.OMj = r'ii iv: [u^, 1^(8) : pjs.Dtij/cu 
«SY:v2Nft.ufcj = M(N: [ r^H , 1 28J :v2i^s.(ibj/cu 

h. BUILD IHt. LlhhAHV A6 i- ULLDViS : 

(THt. U'^UtNLlNKD I'tAl T& 1 VPKU B> iHK USK-H; AUL Li-I!it:S AHK 
'rt,H^•ll■JA■l tL' wllH A CAHHihGt. kHTUHH). 

H U \i S 1 , 1 H P 

♦K)kl,lH<4()> = UKl ,U I SCli^,HJPbi. , V/'US, ;>''./('■• 



StPPS 



SE KHTb 



(TjPh A <CP> MjK IHt IHIKU LIi'.K. IT -IU6T (iti bUANK.) 



SKin2 


ILL 


IlvS 


SKrjDi 


ILL 


IN 6 


st.->Jir2 


li,L 


INS 


SCl-di 


ILL 


J (■J S 


SKI 112 


ILL 


Ifv& 


SF 11.12 


ILL 


IniS 



*tZ (TYPt: CUIMTPUL Z Hk-KE) 



IHK KIIjKS Cil6CLi|-i.uBJ , ^UPK^l.i.)^J AuD Aivr MLKS t^HDUGHT Ik t^i 
STtP b fiAi H.K DtLKltU rtl IHK USt.Kft U ISC KKX i UM . 



FORTRAN IV/RSTS-E, VIC Seq 14 1 7* 

FORTRAN PATCHES 3 of 3 * 

OTS 



324 



RSTS/E Software Dispatch, July 1976 



I-FORMAT CONVERSION ERROR 



[b A :jh,(,Ai IVh, \//il,iJb IS TRANSFERRED I- I iK UUlHul ihMutK fHc. Cuf.J-Aiu ..jf 

UK !Hf, HS-SUl.l JS bUUAb llj IHK MhLl; .-.lOTn Sf'tC I (- ltt,0 . Tut, MKLi; 1 1> 
r;ilTASTERISK KILLKO; UiK 'ViJ:-?bf-,K IS t'KlJfKU MlHUUl iHh bKai)li,i, 

'IhK Kl.L.LlJ'; r-iG k'ArCH CUKKt.CIS IHt l-HUbLKM. 

ItiLK IS PAl'Cli to lU TnH. KilS/e, HihlpAU iv L-Me-Ci Ti-.K SuSlh;. lulSJ. 
iHr u.'^fc.h vShLiULI.) KKcP 'I i■iAC^ AS '1(1 ^, h 1 C H HAlC'ito H A i/ -j i-llk i liS 1 A buh.iJ 
1^^ hl6 UIS? Trifhf, IS CiJHHt-,?.J l,y Ml PATCH uf.VtL i -.O i C ATi.iH . 

1. HjC Jivni IHH SV^Tf.f" unDfH ACCulii^r (1,2J, rht, vSySTt.i-1 HhKAKV 
ACCUUuT. 

i, CuPy 'IHt, ClLK ()l oC'Ji-l.UiiJ \H\\t-- ItiK bACK'JP '-Itl-iiA («mI-.kK U nAti 

SlllHh.U Xf< LlKS PAICH »4 HfiTChJ Ih ivUl Ai.Kt.AOy li ACCuUi-iT ( 1 , <i J . 

t:.(,. Kuf>: SPTK- 

»6i :uiscnM.uhj=xx:()jscoM.aHj/cii CaK ks ihf. hacmip oi-.viCr,, 
le XX = uTu: jHtij /Cii:i MJsr ht. nsttjij 

J. n>J Hit KuLi.Di'. Ih(. iHr; USt.h TYPtS I'ht Ui iUt.PSCMKtU TKXT; LiivtS Awt 
I t;i(i"ili,;Ai h u \<X A CAHKlAGt PM'liPf, . 

HUi'- SPA'ICHU 

♦ OPb''i 

f.iJlKH li-Jl^Ul t lbfc*l.i76CliM,lJhJ 
fciMipp UUlPUj H ILP + OiiCUi-'.i-'t.'i/ 

*pui'-n C'liHiVi 

* '■' U ii fj 3 b ^ = )! 1 7 b 7 

♦ AMKIj ib 4 = 8 <!0 

♦ .vUkf) 404=»-7/!/// 
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• Ai.lhiU 41/! = i(207 

t.urt.R CHtO.SUM: 16/777 
sroH — 

H t, « t.' V 

HUN S P I P 

«(jrSClJV:.uoJ/Uh. 

« r sc OM . Lib J / H t=Li rsc li i'^ . n e. sv 

4. Al IHIS PDIM IhK ^UDULt (U&CUN'.UbJ StiJUliD bt. Cl.ltM(-:i.) Ur^lliJ 
THt, ttACKDP MtDiA KOH PUSSlbbK HiiUKt USb. 

t.G. RUi'i SPlk^ 

»XX:U'tSCnM.UBJ = U16C(lfH.(JBJ/C() vvHtRt XX IS rut ttACKUP DirvlCK. 

b. TflK 1-UHlHA^ LJbHAHr SHUULU ^(H-( hE HK-bUibl'. 

IhAT Pk()Cfc.UUHb IS UeSCHlHtO I i- THI-: HSTS/h. SlSTt^'-i GtubH AT lu-.'- 'iAiMOAb 
(UEC-1 l-OKGf-A-A-lJNl) PAGb 4-oy, 4-7u AtU 16 KbPKODUCKlJ bhIbOvM. 

IN THh, K)L(L(jwIivG, .'V? KKPPfcSKfMS IHfc HAnUrtAKb -lUI-UibK APPHUPr<iAlh 
i-UH "^nUK COhKlGUPMilON. l.b. bis, f 1 S , DP KPU. 

CLiPY THb KiLb tUPE»i.OtJJ e PtiM IHK bACMJP MbDlA (.-JhbHb IT .vAS STUHtLU 
Ifj IHb LAS'l PATCH) IK ;muT ALPbADr' Iw ACCUUNT ll,2J. 

E.G. PUN SPIP 

» s i : [• iiPb ij . Ob J = X A : f UP bw . t)B J / C u 
(XX IS THb BACl^uP UbVlCE. It XX = i'TM l.Ht.iJ /Ct):T MliS I bt USb.J) 

CilPi IHb flLbS b-n .UtiJ ,ril .('HO .M ^'iS.UiiJ KKO"i IHt I) I ST P LbU i' iu^l 
'•ItOlA lb MJ'l MbPbADV l'" ACCtlUNT 11,2] A6 KUbbU*.S: 

uiilji'jX !.!i>iL iih Ibc, pb'LLLi.'ilriG PST6 FUK IKAhj U 1 S 1 P i bUT I iTI ^r,lUH 
DtM A bPbb UiMll . 

CUPi UP l.>bC-l l-bPbSA-A-Hw CPM 
DbC-Lb-bPh SM-A-ilti/! (DbCTAPfc) 
DbC-n-LHfSA-A-Mb7 f'AGlAPb (7-TPAC\) 
|)tC-ll-LPbSA-A-MH9 HAGTAPt (Si-TPAO) 

i-iAKb IHb u^a'l HbAoy. 
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5 A. iH^ UlS 1 HlbUT lijiO 

■•lliDiJl IriK CUPy UF Jm: Htolb ^ JHXHA,^ DISIk [bUl ion :'.-£OiA u.S[!a; IHt 
uTil/lj pF(.H.,Pfl -1 A,gu I UK LAHlr.L KilRlHA.M. 

HUn SUTJLIl 

iff-!UiilVi L;M\j : I- UHI hiAN 

t^UN $I-1F 

sst : uimI .i!hj = uK!j : i):g i .dhj/co 

bti. CutC-TAPh, l/lSiHj HUT JOiv J 
Kliij $P1P 

» 6y : .'' ? ? . ui^ J=oTi>t : .^ ? .•■ . !ibJ/C(i : t 
»o I : V i* i'-;rf , Ohj=o ) IV. : V iivs . ub j/cu : r 

!5C. tliAGIAPfc. UUSlHlhli riU"J) 
bUi', SPIP 

»SY : Pn.Obj-f'iXM: Ll <irt , WHj : ?> .'.hhj/cu 
fSV : vi:i-is.OMj=iv: r,j: i i^t<, i <^hj : V/!"<6.uHj/Cii 

h. "JJLiJ Jht I.IH(<AhV as KuLLiiFici: 

(rHfc. Ul.'Ufc.K|.lP.KO TcXl li, TVPKL hY i'HK USCW; Mbl., bl,>it6 Ahc. 
ItH.'ilNMTt-li .■/IIH A CAKKlA(.,t Ht.j UKij j . 

RUii SLIHP 



Li<ipy pujui.s; 
s e R H o 



S K, K t< l' ii 



liiFb A <(>> Kit- iHt Thitvu Ll'JK. JT -iij.Sl nt t>bA1■J^.) 



^c i i.i^. 


i i,L, 


i '0 o 


S(t.ivi)i? 


ILL 


I US 


SK'viDi; 


ILL 


J H .S 


SCI.U^ 


ILL 


ll)t> 


Sf |ij'^ 


ILL 


J 1 J ,b 


SFIU^ 


1L(. 


If' 6 



*tii iTYeK CUMkUL Z HtKtJ 



]nb e ILbh 1 .SCUi'-.U>-(J , f iJPKiv.iinJ AuD A.vY flLhtj bUdiiCHl in bt 
SltP '> MAi hi-. PKLtltO Al Jhb lj.StKS iUoCFf.tl -liJ. 
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COMPUTE-BOUND PROGRAMS MAY ABORT PREMATURELY 



CU'-'f'll l>.-bUUt-U fK(iGKAt"6 HU.^I"il^lG U-< fLiH-ll/^b Uh t^L)P-ll/?0 
PHOCKbSUKa wii'M Iht fPll-h UH KFll-C FI,(lAir«G PiliNl 
PKilCt.SSOK UfTllirJS HAV iij^Ufc. t.HHUIJFiiUS h.HKUH Ht.6i.AGe.S 
I.IH AHUhT HHIOH TU COMPLf-.T I UN . IHt f ULtAiw 1 (\l(j PATCH 
ClJhKKCIS Irib PKuhLbi*'. 

TH15 IS PATCH Hi TU Iht KUKIHAf* i V HIilJ-T 1 >)(■. S V .S 1' f, -''. . 

THIS PATCH SHOULU bK APPLitU KKGAPULKSS UK Titt, PReStMCt IJF 

l-PU KbUATir^G PUlNi HAND-vAHb UiM THfc Sl^STti't 1>^ UbtSTlU.J. 

1, LUG INTU Tilb SiSrtM UNOhH A PHXVibKGtiJ ACCUUImT. 

2. IT IS i-ieJCfcSSAK^ ru HtMUVc. THt FORTRAN IV HUN-Tli^t 
SYSTEM .^HILr MAKING IHiS PATCH. If TrilS wlLL, 
k-KFtC'I uPBHATiUMS, UStKS SHOULD Ht MJlIfltO Al 
THIS PUlNT THAT FUHlRA.v wILL bb. UiMAVAlLAbLF Ui^il'lL 
iHfc, PATCH IS COMPLtft. 

i. HUiM SUTll/lV 

? UwLOAU FURRIS 
? Rt-.f-'UVt FUHRlh 
? bAlT 

4. i^ THt FULLHwInG, THF UStH TVPKS THF UniUt:H3CUKt;U 

IKXT; <CR> Lbl'iUltS IHt CARRlAGt RtlURN KtV; <LF> 
iJfc:NOTtS THfc Llhh Ftt.O KtV. 

HUH SHUT 

UDI VXX-YY 

Flbfc? lU, 1 JFUHKTS.RTS<I.F> 

♦d624/ ulOObb 1J7<LF> 

U0bb2b/ 0U02b4 17bb44<CK> 

♦ lbb44/ UUOOOO 100bb<I,F> 

ijl5b4n/ OOuOUO 2b4<LF> 



FORTRAN IV/RSTS-E, VIC Seq 14.1.9* 

FORTRAN PATCHES 1 of 2 

RUN-TIME SYSTEM 



3^8 



^)lbo's^/ liOOOuO 100u<L.^> 
Ol'5bb4/ UOUUIM.) 44,^<.L,t> 
01 bob"/ uOOOOO 1 04i7 7<l,K> 
albbho/ uOOOOO 1040 3c<i.K> 
Olbbbi;/ UUOOOO 20 7<O> 
*Ulbbl7\ 073 loKCfO 

*tz 



b. Tht t<UK-Tlir SKSfh'l i-li.Sl ivU'.-. i^K Hti I'iS T AL,I,t.i) .vlfh IHt 

KUI.LUifdiMG cu^'|V!A!M;s: 

HUiM SlJl 1 Ijl Y 

? hl)ii KuHk'lts/Li' i 

? bUAU HiHhl.S 

0. II IS AiJVlSAaLt. i'U CUPl IHF. fATCHb.I) KCb TU A f.-iACKU|J 

UK»/ICK A'l 'IhJS JIMf-.. XX: Rfc,HHLSb!>i I'b Tht: ^iflC^U^' I'h.vlCt:, 



HUN St'iF 

»XX:HJKKTS.t<T6/CU=lU, 1 JKr.ihhTS.HlS 
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J=J-J GIVES INCORRECT RESULTS 

1. STATf^tfJlS U^ Iht FOhH 

J=J-J 
AHt iNCUKHtC'lLl UFtl"UZt.i) 10 CUOfc. trtdl V ALEr-i r iO 

2. IMPHUPKK COUt GKlxh.RATKJ'J eON CEHTAlu 3UbrKACl AND UlVlOt 
UPeRA'l lUi^iS llv Iht intlGHtSORHOraJ OK A C0>\ V t:RSIO^ uPtRAlIiiN 
i/'iHuSE RfcSULT 15 A COMMO:m SUH-(':XPRi':S.SIUiv . 

i. llMTKHACTlLJrvS b E 1 •« B. R. N SfATtMLNTS whlCH GfcNtKA it. 1K.MI:>0RAHY 

VARlAbbfcS Ar.D tRRURS I'm THtSfc STATbiMtnT.S v\M CAUSt. THE CU^-ifiLtR 
TU LOOP. 

4. UPUATING VAHlAbL.ES IN OIEEEHEM CUMMUi'J uLuCKS .iiiTH THE SAHE 
UEFSET VIELUS INCOHRECI RESUblS. 

THE EOLLOwIuG PAICm CORRECTS THESE FRUi3LEMS. 

THIS IS PATCH «2 ItJ THE HS15/E tuRTRAiM iv CU'iplLER. 

1. LUG JNTO THE SYSTEM UrjiJER ACCOUM' ll,2J, THE SYSTEM! LlbRARK 
ACCOUNT. 

lA. VERIH' THAT THE CUkHEi\/I VERSlUr. OF THE CUrlPIbER IS \/UlC-03A. lUiS 
MAY BE UUNE AS MIELUWis: 

RU!^i SEORTRAh 

♦,tt:=1t: 

\L (TYPE CTRl, Z HtHEJ 

EOKTRAN IV V01C-U3A SAT 27-MAR-7o 19:lb:ib PAGE UOl 

It THE Current version is not V01C-03A, THEiM THE PREVIOUS PATCH 
NiAY HAV'E bEt.i.' Oi»lTTED. 

I, ENTER IHE E0LI,Ua1hiG FILE: 

FILE fvA*«E: THST.FOR 
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COMMON /Al/ II 

COMMON /A2/ 12 

11=12+1 

A=lf 1X(1000**A) 

J = J-J 

cJ=l/CA+l ) 

3. CHEfilb A CUPl liF THt CiJMFlLtH. THIS IvS THli COPY '1 (J Bk, PATCHtU. 

RUi« $eJF 

ltULUFljH.SAV=f-OHlHA.SAV/CiJ 

)!OLLiKiR.SAV<104>/Ht 

«tz 

4. IN Xht KOLLOwIi'JG [rifc UStH TVPtS Tiifc, liNDLHSCUHtO Tt;<r; <CK> ub,.M.iTe.S 
THt CAHHIAGK Ht'l URN Kh,Y; Cbt > IjKWuI'KS ine; LINK FEED KtY. I'Mt; 
HfciiUl/TlfJG Vfc,RvSlui\l UK (•UHIHAN »•- U.L rit KuRlHAiM H/ VUlC-Oiti. 



NOTE: 



Column 2 to be typed only after Column 1. 





Column 


1 


Column 2 




KU;^! PATCh 


20227 

12 















402 


4/37<L,f > 
2224<Ch> 
20227<l.,i' > 


11:4,320/ 
11 :4,322/ 
♦11:1,0/ 
11:1,2/ 
11:1,4/ 
ll:l,b/ 
11:1,10/ 
11:1,12/ 
11:1,14/ 
11:1,10/ 
11:1 ,20/ 
11:1,22/ 
1 1 : 1 ,24/ 
11 ; 1 ,26/ 
♦ 1 4 : 2 , b 4 / 


■5721- 

5020 



127 1KL 




PATCH V01-02 

F-ll.fc I-Afvit-- 
»UL0KOH./O<CH> 


221u<Le> 
4a2<.CK> 


*221U;1H 


' > 


*22bO;2K 


2012<I.,F> 


♦2i44;3P 


'3041<1,F> 


♦304b;4H 
♦10:3, b4t>/ 


















Ib7o0 

17;i30 

4/7u2 


5U41<LF> 
b 4 1< L F > 


10:4,4b/ 
♦10:1 ,14/ 


b041<L.F> 
b741<LF> 


10:1 , 16/ 
10:1,20/ 
10:l ,22/ 


^0 <!,!■> 

J003<LF> 

20227<L.F> 


2iu3 7<;ijt > 
2lb2<LF> 
101 3bb<Ll'> 


iu:l ,24/ 
1 : 1 , 2 b / 


12<LF> 

2 7 < L F > 
104'403<CH> 


207<CH> 
4737<LF> 


10:1,30/ 


14:3, 4b 6/ 
+14:2, IbVb/ 


2210<CK> 


♦11:3, 1020/ 


4737<Lt> 


4 737<I,F> 
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NOTE : Column 


4 to be 


typed only after Column 3. 






Column 3 1 


Column 


4 




14:4,1012/ 
*14:i,u/ 


17760U 


21b4<l. 
1 IbOK 


2234<CR> 
13700<be> 


le: 1 , 14/ 

lb: 1 , 16/ 

16: 1 ,20/ 

16:1,22/ 

lb:l,24/ 

lb: 1 ,26/ 

16:1,30/ 

16:1,32/ 

16:1,34/ 

16:1, 36/ 

16:1,40/ 

16:1,42/ 

16:1,44/ 

16:1,46/ 
♦3324;bR 
♦ 3 3 6 6 ; 6 R 

*2 0:b,660/ 






























21014 

1010 

14000 

21014 

1010 

14 0(.O 

21014 

1010 

J 4 U 

101 


10 12<LF> 
22037<L,F> 


14:1 ,2/ 
14:1,4/ 


,F> 


2be6<LF> 
1007<LF> 


14:1,6/ 


42701<I.H> 


bO10<L('> 


14:1,10/ 



















12721 

3b40b 



25b4<I 


177bOO<LF> 


6 2 7 37<i.F> 


14:1,12/ 


12u027<l,K> 


1777 /0<LF> 


14:1 ,14/ 
14:1,16/ 


12b<LK> 
103401<Lt> 


2b44<t.,F> 
b726<LF> 


14:1,20/ 
14:1,22/ 
14:1,24/ 


b026<LF> 

207<LK> 

42702<Le> 


137<LF> 

5nb<LF> 

12721<LF> 


14:1,26/ 


177600<LK> 


3b405<LF> 


14:1 ,30/ 


20227<Lf> 


207<CH> 


14:1,32/ 
14:1 ,34/ 
14:1,36/ 


103<Lf > 

loo3<Le > 

22121<LF> 


1011<LF> 


14:1 ,40/ 


lb2716<LF> 


20:6,620/ 
20:6,622/ 
♦21:6,604/ 


21014<LF> 


14:1,42/ 
14: 1,44/ 


16<LF> 
207<CK> 
4737<LF> 
2210<CR> 
12 /00<LiF> 


404<CR> 
1011<LK> 


*lb:4,lb32/ 


21:6,606/ 
21 :b,oio/ 
♦22:5, b64/ 


21014<IjF> 


16:4,1634/ 

♦16:1,0/ 


404<CH> 
10)1<LK> 


16:1,2/ 


jF> 


22:0,524/ 
22:6,526/ 
♦l:2,250b\ 


21014<LF> 


16:1,4/ 


b720<LF> 


404<CH> 


16:1,6/ u 


1000ie><LK> 


102<CR> 


16:1,10/ 






22037<LF> 


♦ E 
RfcJAOif 




16:1,12/ 


2b64<LF> 
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b. I'tsr iHK PATCH hy CUVipLLlrH, fHt TKST PHiiGHAM ( TKST . FOH ) AUIJ 
UbTAI.UivG TMt, Gi-.iilbHATf.O CODt; LISTING BU CH WUH AND .vlTHIJUT 
THE l5t:BuG OHlOu (COi>PILf-.R /D OPTION). PHINT THt: LISTINGS 
ivHt.M Tmi-Y A^lt CUMPLiKle,. 

t.G. KUf-- tXtC 

*C)LUtOR 

* , Tc, STD=iE6i/L; ALL/lJ 
[.cAiN.] erkohs: 1, /sAHMnGS; i' 
♦,TtST=TEST/L:AbL 
*tZ CCIHL/Z US TxPfe:iJ HEHtJ 

Pf.AUJ 

b. IK Tub. COHFlLtK AbUKTS, LOOPS, OH THt GtUfciHAttO COIJii IS iWJT TrthJ 
SAME AS IN THE LISTING HELOvs, REAPPLY THE PAICrt STAHTIijG AT 
SIEP 3 (ABOVtK 

7. O.mCE the compiler has bEEfJ SUCCh SSt UI,Ll PAICHEU, PEPLACE TnE 
OKIGINAL WITH THE PATChr.U VEHSIO.N AS UUILINED HELU.-v: 

liStPS SlUlULU PEEHAliN EHUM INVUKImG FUPTRAig EUh 1 HE UUHAlIUiJ uK 
THIS STEP; THE MESSAGE 

CAlv'l HiMU EILE OH ACCOtii-JT Al Lii\E '110 

WILL BE GEl'.tKATED IF EuHTHA.SAV IS ivul PHESE-MT /JME^m 

EITHER RUN SKURTKAN OR IHE tOR CCL IS USMI lU INVOKE MJRIRA.M. 

AT THIS POIuT THE Utti (PfiTCtiEi>) COMPILER SHOULD oE s-iADE TO REPLACE, 
THE UNPATChED VERSION. 

t.Q. 

RUNi SPIP 

«EORTf<A.SAV/DE 

»FORlRA,SAV/RE = ULDEC)R.SAV 

»tz 

M. 'lOi-i IHAT IhE PATCH IS INSTALLED, THE PAICHtu) VERSIOiv Olr EORTRA'M 
SHOULu ME CuPIEO ONTO SOi'iE bACMiP ^tOIA h oH PiJSSJHLE FuTUkc 
PATCHES. 
E.G. 

RUh SPIP 

»XX i r ORl r A , 3AV-r uRTRA , SAV /CO aX IS Tnh, oACKLiP OEvlCE, 

listings 
file: test.lst 
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FOwTRAfJ IV V01C-u3h MOM i9-MAK-7b 21:02:^7 

0001 COMi'irjN /Al/ 11 

00U2 ClIMMON /A2/ 12 

OuOi 11=12+1 

I) A = iFIX(10uO*»A) 

0004 J=J-J 

OOGb H=1/(A+1J 

00 6 t ;« P 



FUHTHAN IV SrUNAGt, '^Af 

tgA^Jlf-; (.)ftSt:T ATTHlbUltS 

J 00000b lf^ltGtH*2 VAHIABLK 
b 000010 HKAL** VAHlAbl.t 
A 000014 ReAl, + 4 VARIABLt. 

CO-IMON bLUCK /Al/ LENGTH 000002 

U 000000 liMTfc:GtH*2 VAKlAbLt, 

CUMMUiM BLUCK /A2/ LENGTH 000002 

12 000000 lNlt;Gfc;h*2 vARlAbbE 

FOHTKAN IV GENtHAlEu CODE 

IS'v »000J 

000020 LSNS BOOOOOj 

000024 MUISHM A2t«000000 Al+ftOOOOOO 

000032 1CIS'»1 Al + HO&OOOO 

IS'^ (»0004 

0000 3b ISi'^iS 

000040 MOISOM OOOOOb 

ISN KOOOiD 

000044 16N$ 

00 46 MUlSIS « 000001 

0000^2 CHS 

000054 MUlSIS ItOOOOOl 

OOOObO CHS 

000062 ADfSMS 000014 

OOOObb DlfSSS 

000070 MOFSSM 000010 

IS'M tfOOOb 
000074 IStvS 
000076 RETS 

file: TESTD.L6T 
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F'ORXt^AM 


IV 


V 1 C - 1 J b 


OOUl 




CUMMUm /A)/ 11 


0002 




CUi'.i'iUM /A2/ 12 


0003 




11=12+1 


oOOi 1) 




A = ll- lAl iOOU»*Aj 


000b 




J=J-J 


000b 




6=1/CA+1 ) 


0007 




Cl»U 



MOpj 29-MAH-76 21:u2:J2 



FUHlKAN IV DlAGfiUSUCS 

l!\l LlNfc; 0004 MSG #090 IbLtGAL TKFk. KOh UFcHAlOK 

FOHTKAN l>j SlijRAGt, MAP 

fJAMt Ol-KSt/1 AIlHlbOlbS 

A OOOOOb KLAl,*4 VAKlA^bt 

IFIX OOOoOO IMb.Gd.H»2 PHOCc-UUHfc. 

J 000012 lNTt:Gt>*2 VARlAbLb 

b OO0014 RhAL*<i VAHIAHLK 

CUMviQiN tiLUC^ /Al/ ILMGIH ui)0002 

11 OOOOOO liMlfc.Gi-.,t- + 2 vARlAbLH. 
CUN^^'UiV HLuCk /A^/ (jtiiiGrH 000002 

12 OOOOOO IMtGtK»2 vARlAtiLt: 

FOMTHAfJ IV GtiMfXATLO CuDt 

lo:>l itOOOJ 

00002 2 LSrJS #000003 

000026 i'lUlSMM A2 + »OO0OO0 A1 + »000000 

000034 ICIS''^ Al+«OO0u0O 

ISi. #0004 

4 u 1 6 N s 

000042 Flli)$ 

ISk #000b 

000044 JSNS 

00004b MUlSOfi 000012 
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ISJ »OUOb 




0000b2 


ISiNtS 




000 0^4 


MDISIS 


»000001 


U 6 


CKIS 




U b 2 


MUISIS 


»0O0O(jl 


OaOObb 


CFIS 




OO0U7O 


AUH SMS 


OOUOOb 


U0O074 


iJlbSi^S 




U00U7fa 


iviUKSSr-1 


000014 


ISN 110007 




U00102 


ISlMS 




000104 


HtTS 
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RSTS/E Software Dispatch, August 1976 



TRAP TO 4 CORRUPTS PROTECTION CODE (gh) 



CPPTilN CU488ES OF TRAP To ^'S AMD TRAP TO ^^*S 
l-AV CORRUPT THE HEFAULT fASSlGNEO) PROTECTION CODE. 
THF FOLLOWIMG PATCH CORRECTS THE PROBLEM, 



THIS IS PATCH #2 TO THE FORTRAN IV RUN-TIME SYSTEM, 

1. LOG INTO THE SYSTEM UNDER A PRIVILEGED ACCOUNT. 

2. TT IS NECESSARY TO REMOVE THE FORTRAN IV RUN-TIME 
SYSTEM HHILE mAKImG THIS PATCH, IF THIS WILL 
EFFECT OPERATIONS, USERS SHOULD BE NOTIFIED AT 
THIS POINT THAT FORTRAN WILL BE UNAVAILABLE UNTIL 
THE PATCH IS COMPLETE, 

3. RUN JUTILTY 

» UNLOAD FORRTS 
7 REMOVE FORRTS 
? EXIT 

4t VERIFY THAT THE CURRENT PATCH LEVEL OF THE RUN-TIME 

8YSTFM IS Patch level a, THIS may be done as FOLLOWSi 

IN THE FOLLOWING, THE USER TYPES THE UNDERSCORED 
TFXTI <CR> denotes THE CARRIAGE RETURN KEVI <LF> 
DENOTES THE LINE FEED KEY, 

RUN JOOT 

ODT VXX-YV 

FILET rBfllFORRTS.RTS 

♦ I55irv 1C«1 <CR> 

IF THE PATCH LEVEL IS NOT AT LE^EL A (101) THEN THE PREVIOUS PATCH 
HAS BEEN OMITTED AND SHOULD BE APPLIED BEFORE PROCEFDING ANY FURTHER 



RSTS/E FORTRAN IV VlC Seq 14.1.11* 
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Ts? 



RUN $05T 

OOT VX*-YV 

riLET f0,llFOR»T?,»T8«LF> 

*12368/ 34?1» 473y<L'> 

12368/ 14^4 ir9664«CI»> 

*19664/ Vl^99^9 SteSfl^* 

19669/ ft?i29fi9 :j2r0?<tF» 

19670/ pi0pi0«ie \*\.r* 

19672/ 91000(10 1094«LF» 

19674/ 00R000 ^*9\9<Lf* 

16676/ 000000 |004<L'^> 

19700/ «!«<0000 e2't»<l.F» 

19702/ 000000 6<LF» 

19704/ 000000 f27t6<LF» 

19706/ 000000 ?<LF> 

19710/ 000000 ff003<tr> 

19712/ 000000 207«CR> 
*019gi7\ 101 102«CR> 

9. THf ffUN.TIME 9VSTEM MUST NOW BE "ElNSTiLLEO WITH THE 
POLLOWINC COMMANOSl 

BUN SUTlLTV 
t AOO F0RRT8/EMT 
t LOiO F0KRT8 
1 EXTT 

«t TT 18 »0VI8*9LC TO COPY THE PATCHED RT3 TO * BACKUP 

OEVICE AT THIS TIME. tXt REPRESENTS THE BACKUP OEVICE, 

RUN »PIP 

• Xirir0RRT8,RT8/C0« [0, 11 FORRTS.RTS 

«f7 
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MISSING LEFT QUOTE IN CALL STATEMENT CAUSES COMPILER TO TRAP (GH) 



1, PROGRAM UNITS WITH LARGE AMOUNTS OF ARRAY SPACE AND ARITHMETIC 
STATEMENT FUNCTIONS (ASF'S) MAY CAUSE THE COMPILER TO TRAP, 

3. CALL STATEMENTS WHICH CONTAIN A MjgsiNG LEFT QUOTE MAY CAUSE THE 
THE COMPILER TO TRAP. 

3. OCTAL CONSTANTS NOT FOLLOWED BY AN OPERATOR MAY CAUSE THE COMPILER 
TO ACT UNPREDICTABLE, 

SOLUTlONi THE FOLLOWING PATCH CORRECTS THESE PROBLEMS. 
PROCEDURE I 

1, LOS ONTO THE SYSTEM UNORR ACCOUNT Cl,21, THE SVSTIM LIBRARY ACCOUNT, 

lA, VERIFY THAT THE CURRENT VERSION OF THE COMPILER IS Vf!lC-03B, 
THIS MAY BE DONE AS FOLLOWS! 

RUN «FORTRAN 

•,TTj»TTi 

i'Z fTYPE CTRL Z HERE) 

FORTRAN IV V0IC-03B 

IF THE CURRENT VERSION IS NOT VBlC-aSS, THEN PREVIOUS PATCHES may 
HAVE BEEN OMTTTEO AND SHOULD BE APPLIED BEFORE PROCtEOlNG ANY FURTHER 

2, CREATE THE FOLLOWING FILE! 
FILE NAMEi TFST.FOR 

CALL SU6(A,Bi) 

CALL A8SISN(1,«TT|») 

ENO 

3, CREATE A COPY OF THE COMPILER. THIS IS THE COPY TO BE PATCHED, 

RUN «PIP 

«0L0F0R,8AV»F0RTRA.8AV/C0 

«OLDFOR,SAV<104>/RE 

»}? fTYPE CTRL Z HERE.) 
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*, IN THE rOLLOwiNG THE U9EP TYPES THE UNOERSCOPFD TEXTj <CR> DENOTES 

The c»pbi*ge return kevi «Lr> oe'^otes the line feed key. the 

RESULTING VEPSION OE F0RTR4N WILL BE FORTRAN jv VH1C-03C. 
NOTE: Column 2 to be typed only after Coliimn 1. 



Column 1 



Column 2 



RUN $P*TfH 

PATCH veil. 02 

FILE N4ME.- 
♦ OLOFO»/Pi«CR> 

*22l0nR 
*2260|?R 



6»2f2672/ 

*6ii,a/ PI 

6ll>2/ 91 
611*4/ 
6il»6/ 
611,10/ PI 
6ll>12/ 
611,14/ 
•7l2,lAr4/ 
7t2,l6T6/ 
•712,4049/ 
712,4044/ 
*7ll,0/ 
711,2/ 
711,4/ 
711,6/ 
711,10/ 
711,12/ 



120027 4737<LF> 
S4 2210<CR> 
120027<L^> 
47<LF> 

1001«;L^> 

104402<LF> 

1200?7<LF> 

54<LF> 

?07<CR> 

5400 4737«LP> 

5605 ?210<CR> 

12601 137«LF> 

12602 2222<CP> 
?003<LP> 
5400<LF» 

5605<LP> 
?07<LF> 
104412<LF> 
12601<LF> 



711,14/ 
711,15/ 
711,20/ 
711,22/ 
711,24/ 
♦1411,12/ 
*14|2,?S:?1V 
*17|2,720/ 
1712,722/ 
1712,724/ 
*17|1,0/ 
1711,2/ 
17fl,4/ 
1711,6/ 
1711,10/ 
♦5612I3R 
*21r3,1754/_ 
2113,1756/ 
♦21|1,0/ 
2111,2/ 
2111,4/ 
2111,6/ 
♦112, 2506V 
♦ E 
READY 



12602<LF» 

1056««LF> 

6<LF> 

137<LF> 

6326<CP> 

120027 120127«CR> 

122 22<Cfl> 

10S63 4737«LP> 

4 2210<LF> 

5725 240«CR> 

10563<LF> 

4<LF> 

62705«LF> 

2<LF> 

207«CR» 



14004 4737«LF> 

22424 ?210<CR> 

14004<LF> 

62704«LF> 

4<LF> 

?07<CR> 

102 103«CR> 
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5. TEST THE P*TcH BV COHPILING THE FORTP4N TEST PROGRAM, DJPECTING THE 
LUTING TO A FILE AS FOLLOWSj 

"UN tEXEC 

♦ 0I,0FCIP 

*,TEST»TFST 

f.MATN.] EPPnPSl 2, WARNINGS! (1 

♦f? JTYPE CTPL Z HERE) 

6. IF THE COMPILER ABORTS, LOOPS, OR THE GEMERaTeO LISTING IS NOT THE 
Same as the ONE PELOW, REAPPLY THE PATCH STARTING AT STEP 3 fABOVE). 

7. ONCE THE COMPILER HAS BEEN SUCCESSFULLY PATChEO. REPLACE THE 
ORTGTnAl with the PATCHED VERSION AS OUTLINED BElOWJ 

USERS SHOULD REFRAIN FROM INVOKING FORTRAN FOR THE DURATION OF 

THTS sTEPi The message 

CAN'T FIND FILE OR ACCOUNT AT LINE 4 i (5 

WILL 8F GENERATED IF FORTRA.SaV IS NOT PRESENT WHEN EITHER 
RUN fFORTRAN OR THE FOR CCL IS USED TO INVOKE FORTRAN, 

AT This POINT The new {PATCHED) COMPILER SHOULD BE MADE TO REPLACE 
THE UnPATCHEP VERSION. 

E.G. RUN tPIP 

«FORTRA,SAV/PE 

*FORTRA,SAV/RE»OLDFOR.SAV 

tifZ tTVPE CTRL Z HERE). 

Si now that the patch IS INSTALLED. THE PATCHED VERSION OF FORTRAN 

Should be copied onto some backup medium for possible future 

PATCHES. 

E.G. pun «PIP 

#)(K|FORTPA,SAV»FORTRA.SAV/CO VX IS THE BACKUP DEVICE, 
«fC 

LISTINGS 



FILE NAMFj TFST.LST 



FORTRAN IV V01C-03C 

0001 CALL SUBfA.B') 

0002 CALL ASSTGNf 1 ("TTi") 

0003 END 
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FORTRAN IV 



ni*GN0STIC8 



IN LINP (HPIBI MSG Mdti SYNTAX ERROR 

IN LiNf PICIPI2 M5G «05« INVALID OCTAL CONSTANT 



FORTRAN IV STORAGE ^AP 

NAME OFFSET ATTRIBUTES 

ASSIGN ^(100(16 REAL*4 VARIABLE 
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RSTS/E Software Dispatch, August 197 6 



END OF FILE NOT RECOGNIZED FROM KEYBOARD (SPR 11-9224 GH) 



FORTRAN does not recognize control Z as end of file from the keyboard. 

When the FORTRAN runtime system receives a control Z in response to a 
•TTYIN EMT, it exits the runtime system. When a control Z is received 
in response to a .READ EMT, an end of file is passes back to the pro- 
gram. The FORTRAN object time system does .TTYIN EMT requests for 
all teletype input. Hence, a control Z in response to a FORTRAN 
program expecting input from the terminal will terminate the program 
and exit the RTS. 
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CALL OR FUNCTION ARGUMENTS MAY CAUSE THE COMPILER TO TRAP (GH) 



CALL uy euf^ciju..- arguments of the form left-parenthesis, 

CUNSTAI^l (OP V'AKlABbt), KiGhf HftKLMHr.SlS MH» CAU6H Iht' 
CUi'it-'ILhH 1(J ThAP. 

t.G. CALL 'IKSr(^,(U) 

•IHK UlLLUIivINC, PAICh CuHHKCTb THIS PHUbL,t-1. 

1. I,UG (II^TU XHt; SVSlfe.M UHUtH ACCdUMT tl,2), 'IHK S^Slti^ LJHHAKt ACCUUimT. 

lA. VfciKlKi^ THAT THL CUt-HHJfjT VtRSRlN OK THK CUMPlbER IS \/OlC-03C. 
THIS MAV HK uuNt AS (•'OtLOwS: 

KUN Se(J(<THAlM 

♦,tt:=TT: 

"Z tTVft CTKb Z HtKt) 

HiRTHAfa IV V01C-03C 

It THt CUNHKNT VtRSKJM IS iNCjT V01C-03C, JHt.N PHtVlOUS PAi'CMtS MA* 
HAVE HtElv UMlTTtD AiVU 6HUIJLU l*t, APPLltlJ BtfUKK PROC t,KU I NG AlMi KUTHtH, 

i!. CRtAlt A COPY 01- THK COMPlLtR. THIS IS I'Mt COPY TJ BE PATCHEU. 

RUN SPIF 

#|JKlvi'UK.SAV = KUhTRft.SAV/Cl! 

<fNEwF0K,SAV<lU4>/Rt 

»"X (IKPE CTKL Z HbHE] 

i. IN THK (■■OLLO»»ilr<G I'Ht USt-R IKPES Tht. UNUERSCORED TEXT; <CR> UENUIES 
THE CARRIAGE REiURN KEif; <bE> DKmdTES THE LJWE FEED f.iCt . THE 
RESliLTlixG VERSION UE tOwTRAlM kJUL HE KORTRAM IV V01C-03D. 

.H PATCH 

PATCH V01-()2 

EILE hAME-- 
♦nEwKUR/0<CR> 



*22t)0;lR 
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♦2i44;2H 






*ll:^,l75b/ 


520J 

26727 

176030 


26/27<Lf-> 


11 :<i, 17bO/ 


17b032<LK> 


11:^, 1762/ 


26<bf'> 


11 :2,17d4/ 


26 


13U<bi-> 


11:^, 17bb/ 


UIO 


5203<CH> 


♦l:l ,250o\ 


103 


104<CH> 


*E 





anCt: JHfc CUMFlbtH has BttIM SUeCtSSHjLLY PArCHtD, HtHLACt XHt, 
OHJGINAL wITm THK i-'ATCHtU VEHSIUN AS UU'lLliMtU t>t.LOv»: 

USfcBS SHOULD KtfRAIN KRUM IMVOMNG KORTHAN KDK iHt DUHATIUW UK 
i'HIS STEP; THE MESSAGE 

CANNOT FIND FILE OR ACCOUNT AT LINE 410 

wXbl. Ht GENEf<ATtl,) IF KURIRA.SAV IS UOI PRESENT ^MHEN EJTHEH 
RUN SElJRlHAN OR THE FOR CCL IS USED TO INVOKE FORTRAN 

4 

At' THIS FUINT THE ^tw (PATCHED) COMPILER SHUULO BE MADE TO REPLACE 
THE UNPATCHEU VERSION. 

E.G. HUN SPIR 

DEORThA.SAV/DE 

l(KORTRA,SAv/RE = NEwEOR.SAV 

ll-Z (TyPE CTRL Z HERE) 

NUl'i THAT THE PATCH IS li>ISTALLEU, THE PATCHED VERSION OF FORTRAN 
SHOULD BE CUPJEU Dr.lU SOME BAC^UP MEDIUM EuR PUSSlriLE FUTURE 
PATCHES. 

E.G. RUN SPIP 

»XX:FURlRA.SAV=f ORTRA.SAV/CU XX IS THE BACKUP DEVICE. 
K-Z (Tl^PE CTRL Z HERE) 
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CLARIFICATION: COMPARING ASCII DATA ITEMS (SPR 11-8572 RB) 



When more than one character is stored in an individual FORTRAN 
variable (as is done with A-FORMAT conversion) , comparison between 
variables may not yield the expected ASCII collating sequence. For 
example, in the following FORTRAN code, the variable LESS is set to 
.TRUE. : 

LOGICAL LESS 

DATA A/'SF'/, B/'DP'/, LESS/. FALSE./ 

IF (A.LT.B) LESS = .TRUE. 

The FORTRAN language does not specify the number of character data 
which may be stored in a data item; it merely guarantees that one 
character (minimum) can be accommodated in each variable. The PDP- 
11 format for ASCII data stores succeeding characters at ascending 
byte addresses; however, integer and floating-point comparison 
operations compare word, not byte, data, hence the items are com- 
pared byte-reversed from the ASCII sense. To correctly compare 
ASCII data in the PDP-11 environment, the LOGICAL*! datatype should 
be used (which will cause byte comparisons to take place) , or the 
program should be restricted, as per the FORTRAN standard, to storing 
only one ASCII character per variable or array element; e.g., Al 
FORMAT. 



RSTS/E FORTRAN IV 
NOTES/PROGRAMMING HINTS 



Seq 14.2.1 
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REASSIGNING SCRATCH FILE (SPP 11-8184 BR) 



PROBLEM: SORT-11 (RSTS/E) does not allow the scratch file to be 
assigned to a device other than SY: (system device). 

DISPOSITION: The scratch files used by SORT-11 use LUN (Logical 
Unit Numbers) 6,8,9,10,11,12,13,14. In file SRTRST.CMD, these LUNs 
are mapped into SY:. These scratch files may be assigned to a device 
different than SY: when SORT-11 is being built. This is accomplished 
by appropriately modifying file SRTRST.CMD. For example, to assign 
LUN #6 to DKl and LUNs 8, 9, !(? to DK2, do the following: 

Replace ASG=SY: 3 : 4 : 5 : 6 
ASG=SY: 8:9:10 



with 



ASG=SY:3:4:5 

ASG=DK1:6 

ASG=DK2:8:9:10 



SORT-11 VI. 0, V2.0 for RSTS/E V06A-02 Eeq 2 

] of 1 
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DOCUMENTATION UPDATE (SPR 11-8257 FI) 



PROBLEM: The SORT-11 Reference Manual does not correctly describe 
the output files of SOPTA or SOPTI sort processes when SOPT-11 is 
running on RSTS/E. 



DISPOSITION: See documentation update on the following page. 



SORT-11 VI for RSTS/E V06A-02 

SORT-11 REFERENCE MANUAL DEC-11-USTMA-B-D 



Seq 4 
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DOCUrffiNTATION UPDATE 

SORT-11 Reference Manual DEC-11-USTMA-B-D 

1.3.6 RSTS/E SORT-11 Record Formats 

The format of records written by SORT-11 on RSTS/E is somewhat 
different than that produced by SORT-11 on RSX and IAS. While the 
actual data remains the same, SORT-11 on RSTS/E m.ay write what are 
known as DOS formatted binary records (Format 3) if binary data is 

There are three possible record formats in RSTS/E COBOL storage files: 

Format 1: This is the standard Formatted ASCII record, consisting 
of data bytes, beginning on an odd or even address, 
followed by a carriage return (octal 015) byte, followed 
by a line feed (octal 012) byte. 

Format 2: Format 2 records are sim.ilar to Format 1 records, 

except that three null (octal 000) bytes are prefixed 
to the record. 

Format 3: Format 3 records are DOS Formatted Binary records. The 
first byte is an octal 001, the second byte is null 
(000), the third byte is the low-order byte of the byte 
count, and the fourth byte is the high-order byte of 
the byte count. The data bytes follow. The last byte 
is a checksum byte, calculated on output and verified 
on input. The byte count is the number (in binary) of 
data bytes plus 4 (the number of header bytes) . It 
does not include the checksum. The checksum is 
calculated so that the (8-bit) sum of all bytes, 
including header and checksum, is zero. 

For variable-length record files, RTSLIB (PCS emulator) will scan the 
data bytes. If no bytes fall in the ranges of octal 000 to octal 037, 
inclusive, or octal 200 to octal 377, inclusive, a Format 1 record 
will be written; otherwise, a Format 3 record will be written. 

For fixed length record files, a similar scan is employed, except that 
Format 2 records will be written for data with all bytes in the range 
of octal 040 to octal 177, inclusive. Otherwise, a Format 3 record 
will be written. 



SORT-11 VI for RSTS/E V06A-02 

SORT-11 PF;fEFENCE manual DEC-11-USTMA-B-D 
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RUNNING RPGESP VIA CCL COMMAND 



PROBLEM: When RPGESP is executed via a CCL command which includes the input file 
specification, RPGESP then still asks for the filename — for example, 

ESP PAYROL.RPG 

RPGESP VOl-13 
FILENAME? 

DISPOSITION: The following patch corrects this problem. Obtain RPGESP. BAS from 
the RPG distribution; edit these lines in the source; compile, and replace the file 
RPGESP. BAG under [1,2: — protection code must be <232>. 



1!!!! RPGESP VERSION 1 EDIT 14 20-;>1A:^-75 

2000 PRINT "RPGESP V01-14": 

ON ERROR GO TO 8000: X$=3YS (G6$+CHR$ (-7%) ) : 
Z4$="ESP"+NUM$( (PEEK (518%) AND 255%) /2%) +" .TMP" : 
OPEN Z4$ AS FILS 5% 

30000 K$=CVT$$(SyS(CHR$(7%)) ,16%): K%=INSTR (1% , K$ , " " ) • 

Z1$=RIGHT(K$,K%) IF K%>0%: Q6%={K%>0%): GOTO100f 



RPG II V7.04 

RPGESP VOl-13 1 of 1 
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RUNNING RPGXEQ VIA CCL COMMAND 



The RPGXEQ utility distributed with RPG V7.04 assumes its CCL-entry name will be 
two letters. For example, suppose you set the RSTS CCL table to define "XEQ" as 
the CCL for RPGXEQ. The keyboard command "XEQ ACCT2" would run RPGXEQ, but RPGXEQ 
would then discard "XE" and try to run QACCT2.TSK. 

Properly, the CCL entry-point should take any string up to the first blank or 
tab as the CCL-entry name, and discard that portion to get the taskname. To make 
this so for RPGXEQ, obtain RPGXEQ. BAS from the distribution and edit these lines: 

i::i: rpgxeq version i edit 2 14-jun-76 

30010 C$=CVT$${SYS(CHR${7%)) ,16%) : C$=RIGHT (C$ , INSTR(1% ,C$ , " ")) 
Compile this version, and place it under [1,2] with protection code <232>. 



RPG V7.04 Seq 1* 

RPGXEQ VOl-01 1 of 1 
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REPLACEMENT PAGES 



Here are replacement pages for the RPG II Users Guide (DEC-11-OPRGA-A-D) pages 3-27 
and pages E-1 through E-8. Please remove the original pages from your manual and 
replace them with these pages to update the RPG II Installation Procedures. 



RPG II USERS GUIDE DEC-11-OPRGA-A-D Seq 1 

1 of 10 



RPoPCV contains a feature wnich will resequence all source state- 
ment files as an output option, thus assuring the proper handling 
of line nuiTibers by RPGtSP. 



3.6.6 Maximum Source Program Size 

The maximum number of source statements tnat tne aistrioutea 
RPGE3P can handle is ia0tj. If a file is larger than 1000 source 
statements, a "%3(j1;"'PER iWrt FULL" statement occurs, then the last 
line read is printed. You can tnen abort tne run witn "C or 
truncate the file at the line printed oy "z. The system manager 
can change the maximum numoer of source statements. (1) 



(1) To change the number of statements RPGESP will handle, edit line 
1000 in RPGESP.flAS: replace all occurrences of 1000% in that line 
(shown below) with the desired limit (up to 2300) . 

1000 Dii4 L%(1000%) , Lg%(ia00%), 3%(i003*): p%=i0a0% 

! CHANGE THIS STATEi'lEwT TO CHANGE CAPACITY OF BUFFERS 

Then, compile this version of RPGESP, and save the compiled version 
under [1,2] with protection code <232>. 



CREATING AND EDITING RPG PROGRAMS WITH RPGESP 3-27 
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APPENDIX E 
RPG II INSTALLATION 

E.l INSTALLING RPG II AND ITS UTILITIES 

NOTE 

Before performing this installation be 
sure the RSTS/E error message file is a 
separate file on the system (not part of 
the RSTS CIL) . You can use the REFRESH 
option under RSTS/E to effect this. 
Also, the RSTS START. CTL file should in- 
clude a line to RUN $ERRMSG each time 
the system starts up. Both of these 
provisions are necessary so that BATCH 
will operate correctly. Refer to the 
RSTS/E System Generation Manual or the 
RSTS/E System Manager's Guide. 



The following procedure installs RPG II and its utilities. After 
this, there is a second procedure described in E.2, to install 
SORT-11. Both procedures vary slightly depending upon the distribu- 
tion medium. Section E.3 describes the differences - refer to that 
section before starting your installation. 

To install RPG II and its utilities, log in on the system library ac- 
count [1,2] and run the BUILD program by answering its dialogue as 
follows: 

RUN $3UILD 

SYSTEM BUILDER 

SYSTEM SUILD? NO 

AUXILIARY BUILD DEVICE? <device> 

CONTROL FILE 13? RPGGEN.CTL 



where 



<device> can be DTn: for DECtape 

MTn: for Magtape 

DKn: for DECpack 

[account]3Y : for Flexible Diskettes 



E-1 
(Changes June 1976) 
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The installation proceeds on its own from this point and concludes by 
executing a deiionstration program. Completion of the entire procedure 
is indicated by the message: 



3UILD COMPLETE 
READY 



NOTE 

It is recommended that a hard copy ter- 
minal be used during the installation 
procedure, and that the accompanying 
printout be retained. 



E.2 INSTALLATION OF SORT-11 

To install SORT-11, use the LNGBLD program (supplied by the procedure 
in E.l). Its dialogue is as follows: 

RUN $LNGBLO 

LNGBLD V06A-07 BUILD AN AUXILIARY LANGUAGE 

WHAT LANGUAGE IS TO 8E BUILT? 30RT11 

FROM WHAT DEVICE (S) WILL THE FILES COME? <device> 

where 

<device> is either DTn: for DECtape 

[100,100]MTn: for Magnetic tape 

[100,130]DKn: for DECpack 

[accountjSY : for Flexible Diskettes 

LNGBLD will retrieve the SORT-11 files if necessary and will run the 
3RTBLD program. 

SRTBLD indicates the parameters that build the standard SORT-11 task 
and asks if you want to make any changes in these parameters: 

DEFAULTS FOR THE SORTll BUILD ARE: 

fih'AE SORTll 

SCRATCH PAD 10000 (OCTAL) BYTES 

SCRATCH FILES 3 

SAVE MAP? NO 

ANY CHANGES? 

If you answer NO, the building of SORT-11 will proceed immediately. 
Otherwise, for each of the parameters you will be asked if you want to 
change it and, if so, to what. 



E-2 RPG II INSTALLATION 

(Changes June 1976) 



CHANGE SCRATCH PAD? YES 
CHANGE IT TO? 

The size of the scratch pad area can be from 4000 to 77777 octal 
bytes. 

CHANGE SCRATCH FILES? YES 
CHANGE IT TO? 

The number of scratch files can be from 3 to 9. 

CHANGE NAME? YES 
CHANGE IT TO? name 

Where name is the resulting SORT-11 task. It can be any valid 
6-character name. 

SAVE MAP? YES 

THE MAP WILL BE SAVED AS <name>.MAP ON ACCOUNT [1,2] 

Several non-fatal errors will occur during the building procedure. 
These should be ignored. When the 30RT-11 task has been installed, 
LNGBLD will inform you that it is finished. 

BUILD COMPLETE 
READY 



E.3 DISTRIBUTION MEDIA 

The following sections provide specific details concerning each of the 
media on which the RPG 11 software is delivered. 



E.3.1 From DECtape 

First, mount the DECtape labelled DEC-11-LRPSA-A-UC3 on an available 
DECtape drive. Log in on the system library account [1,2] and run the 
PIP program to retrieve the RPG II compiler task. 

RUN $PIP I 

#$RPG . TSK<DTn : RPG . T'SK/CO: T | 

fz I 

READY 
In the device name DTn:, n is the unit number of the DECtape drive. 
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All other RPG II files will be installed using the 3UILD pcograin as 
described previously. 

Mount the DECtape labelled DEC-ll-LRPSA-A-UCl on an available drive 
and run the BUILD program, using the device name. 

OTn: 

Where n is the unit number of the DECtape drive. 



E.3.1.1 SORT-11 From DECtape - The other DECtape supplied, 
DEC-11-LRPSA-A-UC2 contains all of the files necessary to build 
SORT-11. Following the instructions given above for LNGBLD, using the 
device name 

DTn: 

SORT-11 will be built as previously indicated. 



E.3.2 From Magtape 

Before attempting to use the RPG II and SORT-11 Magtape, use the DE- 
FAULTS option of CTS-500/E or RST3/E to insure that the default Mag- 
tape format is in DOS format. (See the RSTS/E System Generation Manu- 
al or the RSTS/E System Manager's Guide.) After establishing DOS for- 
mat as the default Magtape format, start up the system, log in on the 
system library account [1,2] and mount the RPG II Magtape. 

DEC-11-LRP3A-A-MC9 if 9-track, or 
DEC-11-LRPSA-A-MC7 if 7-track 

on an available Magtape unit. Run the BUILD program using 

MTn: 

I as the device name where n is the unit number of the magtape drive. 

Everything is as described previously in the BUILD procedure. 



E.3.2.1 SORT-11 From Magtape - To install SORT-11 from the same Mag- 
tape used above, run the LNGBLD program as previously stated but with 
the device designation being 

[100,100] MTn: 

The installation of SORT-11 will proceed as indicated above. 



E-4 RPG II INSTALLATION 
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E.3.3 From DECpack 

when installing the RPG II software using a DECpack cartridge disk, 
you must first physically mount the DECpack labelled 

DEC-11-LRPSA-A-HC 
on an available drive. 
Using the MOUNT command, logically mount the DECpack by typing: 

MOUNT OKn: RPGLIB 

where n is the unit number of the DECpack drive. 

After doing all of the above, tun the BUILD program as previously des- 
cribed, using the device name 

DKn: 

When the BUILD program is completed, the message 

BUILD COMPLETE 
READY 

is given. 



E.3.3.1 SORT-11 From DECpack - You can install SORT-11 by running 
LNGBLD, using the device designation 

[100,100] DKn: 



E.3.4 From Flexible Diskettes 

When installing the RPG II software from flexible diskettes, you must 
first follow the instructions given in Section 6.2 or Section 7.1 of 
the document, "CTS-500/E System Generation Using Diskettes," 
DEC-11-OCTGA-A-D, to copy all of the necessary files from the flexiole 
diskettes. Mount the first diskette, 

DEC-11-LRPSA-A-YCl 

in an available drive and type: 

RUN DXn: 
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The program on the diskette will respond with: 

CTSDXP V01-08 

# 

after which you type: 

[l,x] SY:=DXn: 

where 

[l,x] is any unused or empty privileged account (the "1" 
is a must), and n is the unit number in which the disk- 
ette has been mounted. 

Copying of the files will proceed. You will be asked for the next 
diskette when all files from the first diskette have been copied. 
Mount 

DEC-11-LRPSA-A-YC2 

when this occurs and respond with the unit number 

DXn: 

When the message 

TRANSFER OF ALL FILES COMPLETE 

appears, exit the copy program by typing CTRL/C and run the 3UILD pro- 
gram as described above. This time the build device will be: 

[l,x] 3Y: 

the same account used above. 



E.3.4.1 SORT-11 From Flexible Diskettes - When the initial build is 
complete, run the LNGBLD program and use the same device designation 

[l,x] 3Y: 

for the 30RT-11 installation. 

NOTE 

Installing RPG II and SORT-11 uses only 
two of the three diskettes. Section E.4 
tells how to use the third, if needed. 
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E.4 REBUILDING THE COMPILER 

The distributed compiler requires 16K words (32K bytes) of memory, in- 
cluding RT3LIB. It has enough table space for fairly large programs 
without spilling tables onto its overflow disk file (slows compila- 
tion) . If the disk file $RPG.OVF is needed, the compiler prints a 
message to that effect and aborts. You can then either create RPG.OVF 
or build a bigger RPG.TSK. Use BASIC-PLUS or RPGFIL to create RPG.OVF 
under [1,2] with protection code <40>. RPG will extend this file as 
much as it needs (and is able), but a filesize of 400 blocks, cluster- 
size 8, is recommended. To build the compiler, transfer the compiler 
files from the distribution medium to a privileged account on your 
system. For magtape or DECpack, use $PIP with a command string of the 
form 

[l,x]<MTn: [100,200]/CO 

or 

[l,x]<DKn: [100,200]/CO 

where [l,x] is a privileged account and n is the unit number of the 
drive on which the distribution is mounted. 

For DECtape, mount DEC-11-LRPSA-A-UC3 and run $PIP with the command 
string 

[l,x]<DTn:/CO:T 

where n is the unit number of the drive on which the tape is mounted. 

For diskette, mount DEC-11-LRPSA-A-YC3 and proceed as in Section E.3.4 
to transfer the files. 

Now you are ready to build the RPG compiler task. Log in under ac- 
count [l,x], if you are not already under that account. Next, run 
TKS, then transfer the resultant RPG.TSK file to [1,2]: 

RUN $TKB 

TKB>@RPGBLD 

TKB>"Z 

READY 

RUN $PIP 

#$RPG . TS (C=RPG . TSK/CO 

READY 

NAME "$RPG.TSK"AS"$RPG.TSK<232>" 

To enlarge or shrink the compiler, change the number of bytes allocat- 
ed (in RPGBLD.CMD) for Psect FREE. This allocates the amount of 
in-core table space, and should probably be 20000 (octal bytes) or 
greater. You can also set the page length for the compiler's listing 
by changing the value of PAGLEN in RPGBLD.CMD. 
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E.5 CTS-500/E RPG II V7.04 DIRECTORIES 

DECPACK DISTRIBUTION ** DEC-11-LRP3A-A-HC 
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READING PACKED & BINARY RECORDS 

If an RPG sequential input file contains records with packed or binary fields, the 
last two bytes will be lost on input (or treated as if they contained blanks) . 

To correct this problem, install the following patch by adding these lines to the 
OTS Patch file $RPGPAT.CMD. You should be at patch level V7.04A for the OTS prior 
to making this patch (see previous dispatch articles) . 

;V7.04B — READING PACKED & BINARY RECORDS 
GBLPAT=RPGPAT: $READ+152 : 425 



RPG V7.04 

OTS V7.04A 1 of 1 
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INDEXED PROCESSING WITHIN LIMITS 

PROBLEM: RPG will not process an indexed file within limits. When such process- 
ing is specified, the program executes and terminates with no output. 

DISPOSITION: The following patch corrects this. Add these lines to the OTS patch 
file RPGPAT.CMD on the system account CI, 2]. Programs needing this patch should 
be re-taskbuilt (they do not need recompilation) . 



;RPG OTS PATCH COMMAl^D FILE ~ RSTS RPG V7.04 

;V7.04A — INDEXED PRGCESSI.'JG WITHIN LIMITS 

G6LPAT=RPGPAT: R. IRA+16 : 405 

G3LPAT=RPGPAT: R. INRA+10 : 4737 : 1000 : 

£XTSCT=RPGPAT:32 

GBLPAT=RPGPAT:i'l.PAT+4: 15200: 104: 5360: 2:5613:15602: 2: 12615 

GBLPAT=RPGPAT:i>l. PAT+24 : 62716 : 2:207 



RPG II V7.04 Seq 1* 
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RSTS/E 

System Installation Notes 

Version V06h-02 

DEC-11-ORINB-D-D 



READER'S COMMENTS 



NOTE: This form is for document comnents only. Problems 
with software should be reported on a Software 
Problem Report (SPR) form (see the HOW TO OBTAIN 
SOFTWARE INFORMATION page) . 



Did you find errors in this manual? If so, specify by page. 



Did you find this manual understandable, usable, and well-organized? 
Please make suggestions for improvement. 



0) 



CD 

C 

o 



3 



Is there sufficient documentation on associated system programs 
required for use of the software described in this manual? If not, 
what material is missing and where should it be placed? 



Please indicate the type of user/reader that you most nearly represent. 

I I Assembly language programmer 

I I Higher-level language programmer 

I I Occasional programmer (experienced) 

I I User with little programming experience 

I I Student programmer 

I I Non-programmer interested in computer concepts and capabilities 
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Name. 



Date. 



Organization. 
Street 



City. 



State. 



.Zip Code. 

or 
Country 



If you do not require a written reply, please check here. (""] 



■ Fold Here - 



Do Not Tear - Fold Here and Staple ■ 
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